Skip to content

R
riscv-gcc-1
Commit 57d4f65c by Zack Weinberg
Options

dwarf2out.c (loclabel_num): Move outside #ifdef DWARF2_DEBUGGING_INFO and mark with GTY(()). 

	* dwarf2out.c (loclabel_num): Move outside #ifdef
	DWARF2_DEBUGGING_INFO and mark with GTY(()).
	* config/ia64/ia64.c (struct extern_func_list,extern_func_head):
	Mark with GTY(()).
	(ia64_hpux_add_extern_decl): Save the decl, not the name string.
	Allocate memory with ggc_alloc.  No need to copy anything.
	(ia64_hpux_file_end): Update to match.

From-SVN: r78061
parent 3fec9fa9
Showing with 53 additions and 43 deletions
gcc/ChangeLog
2004-02-18 Zack Weinberg <zack@codesourcery.com>
* dwarf2out.c (loclabel_num): Move outside #ifdef
DWARF2_DEBUGGING_INFO and mark with GTY(()).
* config/ia64/ia64.c (struct extern_func_list,extern_func_head):
Mark with GTY(()).
(ia64_hpux_add_extern_decl): Save the decl, not the name string.
Allocate memory with ggc_alloc. No need to copy anything.
(ia64_hpux_file_end): Update to match.
2004-02-18 Jakub Jelinek <jakub@redhat.com>
* config/i386/i386.c (override_options): Don't imply 3DNow! for -m64
......@@ -225,7 +235,7 @@
2004-02-17 Ulrich Weigand <uweigand@de.ibm.com>
* combine.c (simplify_if_then_else): Do not replace
* combine.c (simplify_if_then_else): Do not replace
(if_then_else (ne reg 0) (0) (const_int)) by (reg) if the
modes differ.
......@@ -249,29 +259,29 @@
* config/mips/t-irix-gld: ... this.
* config.gcc (mips-sgi-irix6*): Reflect this
(mips-sgi-irix5*): Use it with GNU ld.
* config/mips/irix6-crti.asm, config/mips/irix6-crtn.asm: Renamed
to ...
* config/mips/irix-crti.asm, config/mips/irix-crtn.asm: ... this.
* config/mips/t-irix-gld: Reflect this.
* config/mips/iris6gld.h (STARTFILE_SPEC, ENDFILE_SPEC): Likewise.
* config/mips/iris5gld.h: New file.
* config.gcc (mips-sgi-irix5*): Use it with GNU ld.
Only use collect2 without gas.
* config/mips/iris6.h (IRIX6_STARTFILE_SPEC, IRIX6_ENDFILE_SPEC):
Renamed to IRIX_STARTFILE_SPEC, IRIX_ENDFILE_SPEC.
(STARTFILE_SPEC, ENDFILE_SPEC, SUBTARGET_EXTRA_SPECS): Reflect this.
* config/mips/iris6gld.h (STARTFILE_SPEC, ENDFILE_SPEC): Likewise.
* config/mips/iris6.h (SUBTARGET_EXTRA_SPECS): Moved ...
* config/mips/iris5.h: ... here.
* config/mips/iris5.h (STARTFILE_SPEC, ENDFILE_SPEC): Renamed to
IRIX_STARTFILE_SPEC, IRIX_ENDFILE_SPEC.
IRIX_STARTFILE_SPEC, IRIX_ENDFILE_SPEC.
(STARTFILE_SPEC, ENDFILE_SPEC): Define.
* config/mips/iris5gas.h (STARTFILE_SPEC, ENDFILE_SPEC): Simplify
using irix_startfile_spec, irix_endfile_spec.
......@@ -306,7 +316,7 @@
New function.
(ia64_output_mi_thunk): Use it.
(ia64_struct_value_rtx): Likewise.
2004-02-17 Kazu Hirata <kazu@cs.umass.edu>
* config/h8300/h8300.c (h8300_emit_stack_adjustment):
......@@ -372,11 +382,11 @@
2004-02-16 Matthias Klose <doko@debian.org>
* config/t-slibgcc-elf-ver: Define SHLIB_NAME and SHLIB_SONAME
in terms of SHLIB_SOVERSION.
* config/m68k/t-slibgcc-elf-ver: New file.
* config/pa/t-slibgcc-elf-ver: New file.
* config.gcc (m68k-linux, parisc-linux): Use them when not
* config/t-slibgcc-elf-ver: Define SHLIB_NAME and SHLIB_SONAME
in terms of SHLIB_SOVERSION.
* config/m68k/t-slibgcc-elf-ver: New file.
* config/pa/t-slibgcc-elf-ver: New file.
* config.gcc (m68k-linux, parisc-linux): Use them when not
sjlj exceptions are not configured.
2004-02-16 Eric Botcazou <ebotcazou@libertysurf.fr>
......
gcc/config/ia64/ia64.c
......@@ -257,7 +257,7 @@ static void ia64_rwreloc_select_rtx_section (enum machine_mode, rtx,
static unsigned int ia64_rwreloc_section_type_flags (tree, const char *, int)
ATTRIBUTE_UNUSED;
static void ia64_hpux_add_extern_decl (const char *name)
static void ia64_hpux_add_extern_decl (tree decl)
ATTRIBUTE_UNUSED;
static void ia64_hpux_file_end (void)
ATTRIBUTE_UNUSED;
......@@ -4627,7 +4627,7 @@ ia64_asm_output_external (FILE *file, tree decl, const char *name)
return;
if (TARGET_HPUX_LD)
ia64_hpux_add_extern_decl (name);
ia64_hpux_add_extern_decl (decl);
else
{
/* assemble_name will set TREE_SYMBOL_REFERENCED, so we must save and
......@@ -8653,20 +8653,20 @@ ia64_hpux_function_arg_padding (enum machine_mode mode, tree type)
We output the name if and only if TREE_SYMBOL_REFERENCED is set in
order to avoid putting out names that are never really used. */
struct extern_func_list
struct extern_func_list GTY(())
{
struct extern_func_list *next; /* next external */
char *name; /* name of the external */
} *extern_func_head = 0;
struct extern_func_list *next;
tree decl;
};
static GTY(()) struct extern_func_list *extern_func_head;
static void
ia64_hpux_add_extern_decl (const char *name)
ia64_hpux_add_extern_decl (tree decl)
{
struct extern_func_list *p;
struct extern_func_list *p = ggc_alloc (sizeof (struct extern_func_list));
p = (struct extern_func_list *) xmalloc (sizeof (struct extern_func_list));
p->name = xmalloc (strlen (name) + 1);
strcpy(p->name, name);
p->decl = decl;
p->next = extern_func_head;
extern_func_head = p;
}
......@@ -8676,29 +8676,29 @@ ia64_hpux_add_extern_decl (const char *name)
static void
ia64_hpux_file_end (void)
{
while (extern_func_head)
struct extern_func_list *p;
for (p = extern_func_head; p; p = p->next)
{
const char *real_name;
tree decl;
tree decl = p->decl;
tree id = DECL_NAME (decl);
real_name = (* targetm.strip_name_encoding) (extern_func_head->name);
decl = maybe_get_identifier (real_name);
if (!id)
abort ();
if (!decl
|| (! TREE_ASM_WRITTEN (decl) && TREE_SYMBOL_REFERENCED (decl)))
if (!TREE_ASM_WRITTEN (decl) && TREE_SYMBOL_REFERENCED (id))
{
if (decl)
TREE_ASM_WRITTEN (decl) = 1;
(*targetm.asm_out.globalize_label) (asm_out_file,
extern_func_head->name);
const char *name = XSTR (XEXP (DECL_RTL (decl), 0), 0);
TREE_ASM_WRITTEN (decl) = 1;
(*targetm.asm_out.globalize_label) (asm_out_file, name);
fputs (TYPE_ASM_OP, asm_out_file);
assemble_name (asm_out_file, extern_func_head->name);
putc (',', asm_out_file);
fprintf (asm_out_file, TYPE_OPERAND_FMT, "function");
putc ('\n', asm_out_file);
assemble_name (asm_out_file, name);
fprintf (asm_out_file, "," TYPE_OPERAND_FMT "\n", "function");
}
extern_func_head = extern_func_head->next;
}
extern_func_head = 0;
}
/* Rename all the TFmode libfuncs using the HPUX conventions. */
......
gcc/dwarf2out.c
......@@ -3592,12 +3592,12 @@ static GTY(()) unsigned ranges_table_in_use;
/* Whether we have location lists that need outputting */
static GTY(()) unsigned have_location_lists;
/* Unique label counter. */
static GTY(()) unsigned int loclabel_num;
#ifdef DWARF2_DEBUGGING_INFO
/* Record whether the function being analyzed contains inlined functions. */
static int current_function_has_inlines;
/* Unique label counter. */
static unsigned int loclabel_num = 0;
#endif
#if 0 && defined (MIPS_DEBUGGING_INFO)
static int comp_unit_has_inlines;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment