This moves the global current_subfile into buildsym_compunit.
gdb/ChangeLog
2018-07-20 Tom Tromey <tom@tromey.com>
* xcoffread.c (process_linenos): Update.
* stabsread.c (define_symbol, read_type, read_enum_type): Update.
* mdebugread.c (psymtab_to_symtab_1): Update.
* dwarf2read.c (setup_type_unit_groups)
(lnp_state_machine::handle_set_file, dwarf_record_line_p)
(lnp_state_machine::record_line, dwarf_decode_lines): Update.
* dbxread.c (process_one_symbol): Update.
* coffread.c (coff_symtab_read, enter_linenos)
(process_coff_symbol): Update.
* buildsym.h (current_subfile): Don't declare.
(get_current_subfile): Declare.
* buildsym.c (struct buildsym_compunit) <m_current_subfile>: New
member.
(start_subfile, free_buildsym_compunit, push_subfile)
(prepare_for_building, start_symtab): Update.
(get_current_subfile): New function.
+2018-07-20 Tom Tromey <tom@tromey.com>
+
+ * xcoffread.c (process_linenos): Update.
+ * stabsread.c (define_symbol, read_type, read_enum_type): Update.
+ * mdebugread.c (psymtab_to_symtab_1): Update.
+ * dwarf2read.c (setup_type_unit_groups)
+ (lnp_state_machine::handle_set_file, dwarf_record_line_p)
+ (lnp_state_machine::record_line, dwarf_decode_lines): Update.
+ * dbxread.c (process_one_symbol): Update.
+ * coffread.c (coff_symtab_read, enter_linenos)
+ (process_coff_symbol): Update.
+ * buildsym.h (current_subfile): Don't declare.
+ (get_current_subfile): Declare.
+ * buildsym.c (struct buildsym_compunit) <m_current_subfile>: New
+ member.
+ (start_subfile, free_buildsym_compunit, push_subfile)
+ (prepare_for_building, start_symtab): Update.
+ (get_current_subfile): New function.
+
2018-07-20 Tom Tromey <tom@tromey.com>
* coffread.c (coff_symtab_read): Update.
/* The stack of contexts that are pushed by push_context and popped
by pop_context. */
std::vector<struct context_stack> m_context_stack;
+
+ struct subfile *m_current_subfile = nullptr;
};
/* The work-in-progress of the compunit we are building.
if (FILENAME_CMP (subfile_name, name) == 0)
{
- current_subfile = subfile;
+ buildsym_compunit->m_current_subfile = subfile;
if (subfile_name != subfile->name)
xfree (subfile_name);
return;
subfile->next = buildsym_compunit->subfiles;
buildsym_compunit->subfiles = subfile;
- current_subfile = subfile;
+ buildsym_compunit->m_current_subfile = subfile;
subfile->name = xstrdup (name);
return;
delete buildsym_compunit;
buildsym_compunit = NULL;
- current_subfile = NULL;
}
/* For stabs readers, the first N_SO symbol is assumed to be the
push_subfile ()
{
gdb_assert (buildsym_compunit != nullptr);
- gdb_assert (current_subfile != NULL && current_subfile->name != NULL);
- buildsym_compunit->m_subfile_stack.push_back (current_subfile->name);
+ gdb_assert (buildsym_compunit->m_current_subfile != NULL);
+ gdb_assert (buildsym_compunit->m_current_subfile->name != NULL);
+ buildsym_compunit->m_subfile_stack.push_back
+ (buildsym_compunit->m_current_subfile->name);
}
const char *
gdb_assert (file_symbols == NULL);
gdb_assert (global_symbols == NULL);
gdb_assert (pending_addrmap == NULL);
- gdb_assert (current_subfile == NULL);
gdb_assert (buildsym_compunit == nullptr);
}
start_subfile (name);
/* Save this so that we don't have to go looking for it at the end
of the subfiles list. */
- buildsym_compunit->main_subfile = current_subfile;
+ buildsym_compunit->main_subfile = buildsym_compunit->m_current_subfile;
return buildsym_compunit->compunit_symtab;
}
return buildsym_compunit->m_context_stack.size ();
}
+/* See buildsym.h. */
+
+struct subfile *
+get_current_subfile ()
+{
+ gdb_assert (buildsym_compunit != nullptr);
+ return buildsym_compunit->m_current_subfile;
+}
+
\f
/* Initialize anything that needs initializing when starting to read a
struct symtab *symtab;
};
-EXTERN struct subfile *current_subfile;
-
/* Record the symbols defined for each context in a list. We don't
create a struct block for the context until we know how long to
make it. */
extern int get_context_stack_depth ();
+/* Return the current subfile. */
+
+extern struct subfile *get_current_subfile ();
+
#undef EXTERN
#endif /* defined (BUILDSYM_H) */
language_unknown, since such a ``file name'' is not
recognized. Override that with the minimal language to
allow printing values in this symtab. */
- current_subfile->language = language_minimal;
+ get_current_subfile ()->language = language_minimal;
complete_symtab ("_globals_", 0, 0);
/* Done with all files, everything from here on out is
globals. */
of the closing '}', and for which we do not have any
other statement-line-number. */
if (fcn_last_line == 1)
- record_line (current_subfile, fcn_first_line,
+ record_line (get_current_subfile (), fcn_first_line,
gdbarch_addr_bits_remove (gdbarch,
fcn_first_line_addr));
else
CORE_ADDR addr = lptr.l_addr.l_paddr;
addr += ANOFFSET (objfile->section_offsets,
SECT_OFF_TEXT (objfile));
- record_line (current_subfile,
+ record_line (get_current_subfile (),
first_line + L_LNNO32 (&lptr),
gdbarch_addr_bits_remove (gdbarch, addr));
}
name = cs->c_name;
name = EXTERNAL_NAME (name, objfile->obfd);
- SYMBOL_SET_LANGUAGE (sym, current_subfile->language,
+ SYMBOL_SET_LANGUAGE (sym, get_current_subfile ()->language,
&objfile->objfile_obstack);
SYMBOL_SET_NAMES (sym, name, strlen (name), 1, objfile);
{
CORE_ADDR addr = last_function_start + valu;
- record_line (current_subfile, 0,
+ record_line (get_current_subfile (), 0,
gdbarch_addr_bits_remove (gdbarch, addr));
}
name. Patch things up. */
if (previous_stab_code == (unsigned char) N_SO)
{
- patch_subfile_names (current_subfile, name);
+ patch_subfile_names (get_current_subfile (), name);
break; /* Ignore repeated SOs. */
}
end_symtab (valu, SECT_OFF_TEXT (objfile));
CORE_ADDR addr = processing_gcc_compilation == 2 ?
last_function_start : valu;
- record_line (current_subfile, desc,
+ record_line (get_current_subfile (), desc,
gdbarch_addr_bits_remove (gdbarch, addr));
sline_found_in_function = 1;
}
else
- record_line (current_subfile, desc,
+ record_line (get_current_subfile (), desc,
gdbarch_addr_bits_remove (gdbarch, valu));
break;
dwarf2_start_subfile (fe.name, fe.include_dir (cu->line_header));
- if (current_subfile->symtab == NULL)
+ if (get_current_subfile ()->symtab == NULL)
{
/* NOTE: start_subfile will recognize when it's been
passed a file it has already seen. So we can't
assume there's a simple mapping from
cu->line_header->file_names to subfiles, plus
cu->line_header->file_names may contain dups. */
- current_subfile->symtab
- = allocate_symtab (cust, current_subfile->name);
+ get_current_subfile ()->symtab
+ = allocate_symtab (cust, get_current_subfile ()->name);
}
- fe.symtab = current_subfile->symtab;
+ fe.symtab = get_current_subfile ()->symtab;
tu_group->symtabs[i] = fe.symtab;
}
}
{
const char *dir = fe->include_dir (m_line_header);
- m_last_subfile = current_subfile;
+ m_last_subfile = get_current_subfile ();
m_line_has_non_zero_discriminator = m_discriminator != 0;
dwarf2_start_subfile (fe->name, dir);
}
int line_has_non_zero_discriminator,
struct subfile *last_subfile)
{
- if (current_subfile != last_subfile)
+ if (get_current_subfile () != last_subfile)
return 1;
if (line != last_line)
return 1;
fe->included_p = 1;
if (m_record_lines_p && m_is_stmt)
{
- if (m_last_subfile != current_subfile || end_sequence)
+ if (m_last_subfile != get_current_subfile () || end_sequence)
{
dwarf_finish_line (m_gdbarch, m_last_subfile,
m_address, m_record_line_callback);
m_line_has_non_zero_discriminator,
m_last_subfile))
{
- dwarf_record_line_1 (m_gdbarch, current_subfile,
+ dwarf_record_line_1 (m_gdbarch, get_current_subfile (),
m_line, m_address,
m_record_line_callback);
}
- m_last_subfile = current_subfile;
+ m_last_subfile = get_current_subfile ();
m_last_line = m_line;
}
}
dwarf2_start_subfile (fe.name, fe.include_dir (lh));
- if (current_subfile->symtab == NULL)
+ if (get_current_subfile ()->symtab == NULL)
{
- current_subfile->symtab
- = allocate_symtab (cust, current_subfile->name);
+ get_current_subfile ()->symtab
+ = allocate_symtab (cust, get_current_subfile ()->name);
}
- fe.symtab = current_subfile->symtab;
+ fe.symtab = get_current_subfile ()->symtab;
}
}
}
/* Handle encoded stab line number. */
valu += ANOFFSET (section_offsets,
SECT_OFF_TEXT (objfile));
- record_line (current_subfile, sh.index,
+ record_line (get_current_subfile (), sh.index,
gdbarch_addr_bits_remove (gdbarch, valu));
}
}
SYMBOL_LINE (sym) = 0; /* unknown */
}
- SYMBOL_SET_LANGUAGE (sym, current_subfile->language,
+ SYMBOL_SET_LANGUAGE (sym, get_current_subfile ()->language,
&objfile->objfile_obstack);
if (is_cplus_marker (string[0]))
*/
/* Pascal accepts names for pointer types. */
- if (current_subfile->language == language_pascal)
+ if (get_current_subfile ()->language == language_pascal)
{
TYPE_NAME (SYMBOL_TYPE (sym)) = SYMBOL_LINKAGE_NAME (sym);
}
return error_type (pp, objfile);
}
type_name = NULL;
- if (current_subfile->language == language_cplus)
+ if (get_current_subfile ()->language == language_cplus)
{
char *name = (char *) alloca (p - *pp + 1);
sym = allocate_symbol (objfile);
SYMBOL_SET_LINKAGE_NAME (sym, name);
- SYMBOL_SET_LANGUAGE (sym, current_subfile->language,
+ SYMBOL_SET_LANGUAGE (sym, get_current_subfile ()->language,
&objfile->objfile_obstack);
SYMBOL_ACLASS_INDEX (sym) = LOC_CONST;
SYMBOL_DOMAIN (sym) = VAR_DOMAIN;
/* Line numbers are not necessarily ordered. xlc compilation will
put static function to the end. */
+ struct subfile *current_subfile = get_current_subfile ();
lineTb = arrange_linetable (lv);
if (lv == lineTb)
{
if (fakename == NULL)
fakename = " ?";
start_subfile (fakename);
- xfree (current_subfile->name);
+ xfree (get_current_subfile ()->name);
}
+ struct subfile *current_subfile = get_current_subfile ();
current_subfile->name = xstrdup (inclTable[ii].name);
#endif
projects / binutils-gdb.git / commitdiff