espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-22 19:09:31 +08:00
Code Issues Packages Projects Releases Wiki Activity

* config/obj-som.[ch] (obj_read_begin_hook): Remove last change.

Browse Source 
Breaks with the HP compilers.

        * config/tc-hppa.c (struct call_info): Remove fields which were
        set but never used.  Remove all code which sets those fields.
        (struct subspace_dictionary_chain): Likewise.
        (struct space_dictionary_chain): Likewise.
        (pa_desc): Delete useless function.  Delete all references.
        (hppa_tc_make_sections): No need to count the number of symbols for
        the symbol extension section.
This commit is contained in:
Jeff Law
1993-12-06 19:21:51 +00:00
parent b60f658495
commit dd2f509f3d
2 changed files with 23 additions and 244 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
gas/ChangeLog
View File

@ -1,3 +1,16 @@
Mon Dec 6 11:20:02 1993 Jeffrey A. Law (law@snake.cs.utah.edu)
* config/obj-som.[ch] (obj_read_begin_hook): Remove last change.
Breaks with the HP compilers.
* config/tc-hppa.c (struct call_info): Remove fields which were
set but never used. Remove all code which sets those fields.
(struct subspace_dictionary_chain): Likewise.
(struct space_dictionary_chain): Likewise.
(pa_desc): Delete useless function. Delete all references.
(hppa_tc_make_sections): No need to count the number of symbols for
the symbol extension section.
Sun Dec 5 17:05:29 1993 Jeffrey A. Law (law@snake.cs.utah.edu) Sun Dec 5 17:05:29 1993 Jeffrey A. Law (law@snake.cs.utah.edu)
* config/obj-som.c (obj_som_version): Pass version string to * config/obj-som.c (obj_som_version): Pass version string to

246
gas/config/tc-hppa.c
View File

@ -138,12 +138,6 @@ struct unwind_table
struct call_info struct call_info
{ {
/* Should sr3 be saved in the prologue? */
int entry_sr;
/* Does this function make calls? */
int makes_calls;
/* The unwind descriptor being built. */ /* The unwind descriptor being built. */
struct unwind_table ci_unwind; struct unwind_table ci_unwind;
@ -153,23 +147,6 @@ struct call_info
/* (temporary) symbol used to mark the end of this function. */ /* (temporary) symbol used to mark the end of this function. */
symbolS *end_symbol; symbolS *end_symbol;
/* frags associated with start and end of this function. */
fragS *start_frag;
fragS *end_frag;
/* frags for starting/ending offset of this descriptor. */
fragS *start_offset_frag;
fragS *end_offset_frag;
/* The location within {start,end}_offset_frag to find the
{start,end}_offset. */
int start_frag_where;
int end_frag_where;
/* Fixups (relocations) for start_offset and end_offset. */
fixS *start_fix;
fixS *end_fix;
/* Next entry in the chain. */ /* Next entry in the chain. */
struct call_info *ci_next; struct call_info *ci_next;
}; };
@ -284,50 +261,9 @@ struct call_desc
struct subspace_dictionary_chain struct subspace_dictionary_chain
{ {
/* Index of containing space. */
unsigned long ssd_space_index;
/* Nonzero if this space has been defined by the user code. */ /* Nonzero if this space has been defined by the user code. */
unsigned int ssd_defined; unsigned int ssd_defined;
/* Which quadrant within the space this subspace should be loaded into. */
unsigned char ssd_quadrant;
/* Alignment (in bytes) for this subspace. */
unsigned long ssd_alignment;
/* Access control bits to determine read/write/execute permissions
as well as gateway privilege promotions. */
unsigned char ssd_access_control_bits;
/* A sorting key so that it is possible to specify ordering of
subspaces within a space. */
unsigned char ssd_sort_key;
/* Nonzero of this space should be zero filled. */
unsigned long ssd_zero;
/* Nonzero if this is a common subspace. */
unsigned char ssd_common;
/* Nonzero if this is a common subspace which allows symbols to be
multiply defined. */
unsigned char ssd_dup_common;
/* Nonzero if this subspace is loadable. Note loadable subspaces
must be contained within loadable spaces; unloadable subspaces
must be contained in unloadable spaces. */
unsigned char ssd_loadable;
/* Nonzero if this subspace contains only code. */
unsigned char ssd_code_only;
/* Starting offset of this subspace. */
unsigned long ssd_subspace_start;
/* Length of this subspace. */
unsigned long ssd_subspace_length;
/* Name of this subspace. */ /* Name of this subspace. */
char *ssd_name; char *ssd_name;
@ -335,13 +271,6 @@ struct subspace_dictionary_chain
asection *ssd_seg; asection *ssd_seg;
int ssd_subseg; int ssd_subseg;
/* Index of this subspace within the subspace dictionary of the object
file. Not used until object file is written. */
int object_file_index;
/* The size of the last alignment request for this subspace. */
int ssd_last_align;
/* Next space in the subspace dictionary chain. */ /* Next space in the subspace dictionary chain. */
struct subspace_dictionary_chain *ssd_next; struct subspace_dictionary_chain *ssd_next;
}; };
@ -353,14 +282,6 @@ typedef struct subspace_dictionary_chain ssd_chain_struct;
struct space_dictionary_chain struct space_dictionary_chain
{ {
/* Holds the index into the string table of the name of this
space. */
unsigned int sd_name_index;
/* Nonzero if the space is loadable. */
unsigned int sd_loadable;
/* Nonzero if this space has been defined by the user code or /* Nonzero if this space has been defined by the user code or
as a default space. */ as a default space. */
unsigned int sd_defined; unsigned int sd_defined;
@ -368,16 +289,9 @@ struct space_dictionary_chain
/* Nonzero if this spaces has been defined by the user code. */ /* Nonzero if this spaces has been defined by the user code. */
unsigned int sd_user_defined; unsigned int sd_user_defined;
/* Nonzero if this space is not sharable. */
unsigned int sd_private;
/* The space number (or index). */ /* The space number (or index). */
unsigned int sd_spnum; unsigned int sd_spnum;
/* The sort key for this space. May be used to determine how to lay
out the spaces within the object file. */
unsigned char sd_sort_key;
/* The name of this subspace. */ /* The name of this subspace. */
char *sd_name; char *sd_name;
@ -539,7 +453,6 @@ struct selector_entry
static fp_operand_format pa_parse_fp_format PARAMS ((char **s)); static fp_operand_format pa_parse_fp_format PARAMS ((char **s));
static void pa_cons PARAMS ((int)); static void pa_cons PARAMS ((int));
static void pa_data PARAMS ((int)); static void pa_data PARAMS ((int));
static void pa_desc PARAMS ((int));
static void pa_float_cons PARAMS ((int)); static void pa_float_cons PARAMS ((int));
static void pa_fill PARAMS ((int)); static void pa_fill PARAMS ((int));
static void pa_lcomm PARAMS ((int)); static void pa_lcomm PARAMS ((int));
@ -689,8 +602,6 @@ const pseudo_typeS md_pseudo_table[] =
{"COPYRIGHT", pa_copyright, 0}, {"COPYRIGHT", pa_copyright, 0},
{"data", pa_data, 0}, {"data", pa_data, 0},
{"DATA", pa_data, 0}, {"DATA", pa_data, 0},
{"desc", pa_desc, 0},
{"DESC", pa_desc, 0},
{"double", pa_float_cons, 'd'}, {"double", pa_float_cons, 'd'},
{"DOUBLE", pa_float_cons, 'd'}, {"DOUBLE", pa_float_cons, 'd'},
{"end", pa_end, 0}, {"end", pa_end, 0},
@ -1170,26 +1081,10 @@ static struct default_space_dict pa_def_spaces[] =
/* These macros are used to maintain spaces/subspaces. */ /* These macros are used to maintain spaces/subspaces. */
#define SPACE_DEFINED(space_chain) (space_chain)->sd_defined #define SPACE_DEFINED(space_chain) (space_chain)->sd_defined
#define SPACE_USER_DEFINED(space_chain) (space_chain)->sd_user_defined #define SPACE_USER_DEFINED(space_chain) (space_chain)->sd_user_defined
#define SPACE_PRIVATE(space_chain) (space_chain)->sd_private
#define SPACE_LOADABLE(space_chain) (space_chain)->sd_loadable
#define SPACE_SPNUM(space_chain) (space_chain)->sd_spnum #define SPACE_SPNUM(space_chain) (space_chain)->sd_spnum
#define SPACE_SORT(space_chain) (space_chain)->sd_sort_key
#define SPACE_NAME(space_chain) (space_chain)->sd_name #define SPACE_NAME(space_chain) (space_chain)->sd_name
#define SPACE_NAME_INDEX(space_chain) (space_chain)->sd_name_index
#define SUBSPACE_SPACE_INDEX(ss_chain) (ss_chain)->ssd_space_index
#define SUBSPACE_DEFINED(ss_chain) (ss_chain)->ssd_defined #define SUBSPACE_DEFINED(ss_chain) (ss_chain)->ssd_defined
#define SUBSPACE_QUADRANT(ss_chain) (ss_chain)->ssd_quadrant
#define SUBSPACE_ALIGN(ss_chain) (ss_chain)->ssd_alignment
#define SUBSPACE_ACCESS(ss_chain) (ss_chain)->ssd_access_control_bits
#define SUBSPACE_SORT(ss_chain) (ss_chain)->ssd_sort_key
#define SUBSPACE_COMMON(ss_chain) (ss_chain)->ssd_common
#define SUBSPACE_ZERO(ss_chain) (ss_chain)->ssd_zero
#define SUBSPACE_DUP_COMM(ss_chain) (ss_chain)->ssd_dup_common
#define SUBSPACE_CODE_ONLY(ss_chain) (ss_chain)->ssd_code_only
#define SUBSPACE_LOADABLE(ss_chain) (ss_chain)->ssd_loadable
#define SUBSPACE_SUBSPACE_START(ss_chain) (ss_chain)->ssd_subspace_start
#define SUBSPACE_SUBSPACE_LENGTH(ss_chain) (ss_chain)->ssd_subspace_length
#define SUBSPACE_NAME(ss_chain) (ss_chain)->ssd_name #define SUBSPACE_NAME(ss_chain) (ss_chain)->ssd_name
/* Insert FIELD into OPCODE starting at bit START. Continue pa_ip /* Insert FIELD into OPCODE starting at bit START. Continue pa_ip
@ -1499,10 +1394,7 @@ md_assemble (str)
} }
/* Do the real work for assembling a single instruction. Store results /* Do the real work for assembling a single instruction. Store results
into the global "the_insn" variable. into the global "the_insn" variable. */
FIXME: Should define and use some functions/macros to handle
various common insertions of information into the opcode. */
static void static void
pa_ip (str) pa_ip (str)
@ -4183,8 +4075,6 @@ pa_build_unwind_subspace (call_info)
/* Get some space to hold relocation information for the unwind /* Get some space to hold relocation information for the unwind
descriptor. */ descriptor. */
p = frag_more (4); p = frag_more (4);
call_info->start_offset_frag = frag_now;
call_info->start_frag_where = p - frag_now->fr_literal;
/* Relocation info. for start offset of the function. */ /* Relocation info. for start offset of the function. */
fix_new_hppa (frag_now, p - frag_now->fr_literal, 4, fix_new_hppa (frag_now, p - frag_now->fr_literal, 4,
@ -4192,26 +4082,7 @@ pa_build_unwind_subspace (call_info)
(expressionS *) NULL, 0, R_HPPA_UNWIND, e_fsel, 32, 0, (expressionS *) NULL, 0, R_HPPA_UNWIND, e_fsel, 32, 0,
(char *) 0); (char *) 0);
/* We need to search for the first relocation involving the start_symbol of
this call_info descriptor. */
{
fixS *fixP;
call_info->start_fix = seg_info (now_seg)->fix_root;
for (fixP = call_info->start_fix; fixP; fixP = fixP->fx_next)
{
if (fixP->fx_addsy == call_info->start_symbol
|| fixP->fx_subsy == call_info->start_symbol)
{
call_info->start_fix = fixP;
break;
}
}
}
p = frag_more (4); p = frag_more (4);
call_info->end_offset_frag = frag_now;
call_info->end_frag_where = p - frag_now->fr_literal;
/* Relocation info. for end offset of the function. */ /* Relocation info. for end offset of the function. */
fix_new_hppa (frag_now, p - frag_now->fr_literal, 4, fix_new_hppa (frag_now, p - frag_now->fr_literal, 4,
@ -4219,23 +4090,6 @@ pa_build_unwind_subspace (call_info)
(expressionS *) NULL, 0, R_HPPA_UNWIND, e_fsel, 32, 0, (expressionS *) NULL, 0, R_HPPA_UNWIND, e_fsel, 32, 0,
(char *) 0); (char *) 0);
/* We need to search for the first relocation involving the end_symbol of
this call_info descriptor. */
{
fixS *fixP;
call_info->end_fix = seg_info (now_seg)->fix_root; /* the default */
for (fixP = call_info->end_fix; fixP; fixP = fixP->fx_next)
{
if (fixP->fx_addsy == call_info->end_symbol
|| fixP->fx_subsy == call_info->end_symbol)
{
call_info->end_fix = fixP;
break;
}
}
}
/* Dump it. */ /* Dump it. */
unwind = (char *) &call_info->ci_unwind; unwind = (char *) &call_info->ci_unwind;
for (i = 8; i < sizeof (struct unwind_table); i++) for (i = 8; i < sizeof (struct unwind_table); i++)
@ -4326,7 +4180,6 @@ pa_callinfo (unused)
temp = get_absolute_expression (); temp = get_absolute_expression ();
if (temp != 3) if (temp != 3)
as_bad ("Value for ENTRY_SR must be 3\n"); as_bad ("Value for ENTRY_SR must be 3\n");
last_call_info->entry_sr = temp - 2;
} }
/* Note whether or not this function performs any calls. */ /* Note whether or not this function performs any calls. */
else if ((strncasecmp (name, "calls", 5) == 0) || else if ((strncasecmp (name, "calls", 5) == 0) ||
@ -4334,13 +4187,11 @@ pa_callinfo (unused)
{ {
p = input_line_pointer; p = input_line_pointer;
*p = c; *p = c;
last_call_info->makes_calls = 1;
} }
else if ((strncasecmp (name, "no_calls", 8) == 0)) else if ((strncasecmp (name, "no_calls", 8) == 0))
{ {
p = input_line_pointer; p = input_line_pointer;
*p = c; *p = c;
last_call_info->makes_calls = 0;
} }
/* Should RP be saved into the stack. */ /* Should RP be saved into the stack. */
else if ((strncasecmp (name, "save_rp", 7) == 0)) else if ((strncasecmp (name, "save_rp", 7) == 0))
@ -4493,8 +4344,6 @@ pa_entry (unused)
{ {
if (!callinfo_found) if (!callinfo_found)
as_bad ("Missing .callinfo."); as_bad ("Missing .callinfo.");
last_call_info->start_frag = frag_now;
} }
demand_empty_rest_of_line (); demand_empty_rest_of_line ();
within_entry_exit = TRUE; within_entry_exit = TRUE;
@ -4570,7 +4419,6 @@ process_exit ()
for the end of the function, and finally call pa_build_unwind_subspace for the end of the function, and finally call pa_build_unwind_subspace
to add an entry in the unwind table. */ to add an entry in the unwind table. */
hppa_elf_mark_end_of_function (); hppa_elf_mark_end_of_function ();
last_call_info->end_frag = frag_now;
pa_build_unwind_subspace (last_call_info); pa_build_unwind_subspace (last_call_info);
#else #else
/* SOM defers building of unwind descriptors until the link phase. /* SOM defers building of unwind descriptors until the link phase.
@ -4968,8 +4816,6 @@ pa_proc (unused)
call_info->ci_unwind.descriptor.cannot_unwind = 0; call_info->ci_unwind.descriptor.cannot_unwind = 0;
call_info->ci_unwind.descriptor.region_desc = 1; call_info->ci_unwind.descriptor.region_desc = 1;
call_info->ci_unwind.descriptor.hpux_interrupt_marker = 0; call_info->ci_unwind.descriptor.hpux_interrupt_marker = 0;
call_info->entry_sr = ~0;
call_info->makes_calls = 1;
/* If we got a .PROC pseudo-op, we know that the function is defined /* If we got a .PROC pseudo-op, we know that the function is defined
locally. Make sure it gets into the symbol table. */ locally. Make sure it gets into the symbol table. */
@ -5123,11 +4969,8 @@ pa_parse_space_stmt (space_name, create_flag)
{ {
space = is_defined_space (space_name); space = is_defined_space (space_name);
SPACE_SPNUM (space) = spnum; SPACE_SPNUM (space) = spnum;
SPACE_LOADABLE (space) = loadable & 1;
SPACE_DEFINED (space) = defined & 1; SPACE_DEFINED (space) = defined & 1;
SPACE_USER_DEFINED (space) = 1; SPACE_USER_DEFINED (space) = 1;
SPACE_PRIVATE (space) = private & 1;
SPACE_SORT (space) = sort & 0xff;
space->sd_seg = seg; space->sd_seg = seg;
} }
@ -5642,10 +5485,7 @@ pa_spaces_begin ()
/* Create a new space NAME, with the appropriate flags as defined /* Create a new space NAME, with the appropriate flags as defined
by the given parameters. by the given parameters. */
Add the new space to the space dictionary chain in numerical
order as defined by the SORT entries. */
static sd_chain_struct * static sd_chain_struct *
create_new_space (name, spnum, loadable, defined, private, create_new_space (name, spnum, loadable, defined, private,
@ -5668,13 +5508,9 @@ create_new_space (name, spnum, loadable, defined, private,
SPACE_NAME (chain_entry) = (char *) xmalloc (strlen (name) + 1); SPACE_NAME (chain_entry) = (char *) xmalloc (strlen (name) + 1);
strcpy (SPACE_NAME (chain_entry), name); strcpy (SPACE_NAME (chain_entry), name);
SPACE_NAME_INDEX (chain_entry) = 0;
SPACE_LOADABLE (chain_entry) = loadable;
SPACE_DEFINED (chain_entry) = defined; SPACE_DEFINED (chain_entry) = defined;
SPACE_USER_DEFINED (chain_entry) = user_defined; SPACE_USER_DEFINED (chain_entry) = user_defined;
SPACE_PRIVATE (chain_entry) = private;
SPACE_SPNUM (chain_entry) = spnum; SPACE_SPNUM (chain_entry) = spnum;
SPACE_SORT (chain_entry) = sort;
chain_entry->sd_seg = seg; chain_entry->sd_seg = seg;
chain_entry->sd_last_subseg = -1; chain_entry->sd_last_subseg = -1;
@ -5695,15 +5531,10 @@ create_new_space (name, spnum, loadable, defined, private,
prev_chain_pointer = NULL; prev_chain_pointer = NULL;
while (chain_pointer) while (chain_pointer)
{
if (SPACE_SORT (chain_pointer) <= SPACE_SORT (chain_entry))
{ {
prev_chain_pointer = chain_pointer; prev_chain_pointer = chain_pointer;
chain_pointer = chain_pointer->sd_next; chain_pointer = chain_pointer->sd_next;
} }
else
break;
}
/* At this point we've found the correct place to add the new /* At this point we've found the correct place to add the new
entry. So add it and update the linked lists as appropriate. */ entry. So add it and update the linked lists as appropriate. */
@ -5762,25 +5593,12 @@ create_new_subspace (space, name, loadable, code_only, common,
SUBSPACE_NAME (chain_entry) = (char *) xmalloc (strlen (name) + 1); SUBSPACE_NAME (chain_entry) = (char *) xmalloc (strlen (name) + 1);
strcpy (SUBSPACE_NAME (chain_entry), name); strcpy (SUBSPACE_NAME (chain_entry), name);
SUBSPACE_ACCESS (chain_entry) = access;
SUBSPACE_LOADABLE (chain_entry) = loadable;
SUBSPACE_COMMON (chain_entry) = common;
SUBSPACE_DUP_COMM (chain_entry) = dup_common;
SUBSPACE_SORT (chain_entry) = sort;
SUBSPACE_CODE_ONLY (chain_entry) = code_only;
SUBSPACE_ALIGN (chain_entry) = alignment;
SUBSPACE_QUADRANT (chain_entry) = quadrant;
SUBSPACE_SUBSPACE_START (chain_entry) = pa_subspace_start (space, quadrant);
SUBSPACE_SPACE_INDEX (chain_entry) = space_index;
SUBSPACE_ZERO (chain_entry) = is_zero;
/* Initialize subspace_defined. When we hit a .subspace directive /* Initialize subspace_defined. When we hit a .subspace directive
we'll set it to 1 which "locks-in" the subspace attributes. */ we'll set it to 1 which "locks-in" the subspace attributes. */
SUBSPACE_DEFINED (chain_entry) = 0; SUBSPACE_DEFINED (chain_entry) = 0;
chain_entry->ssd_subseg = USE_ALIASES ? pa_next_subseg (space) : 0; chain_entry->ssd_subseg = USE_ALIASES ? pa_next_subseg (space) : 0;
chain_entry->ssd_seg = seg; chain_entry->ssd_seg = seg;
chain_entry->ssd_last_align = 1;
chain_entry->ssd_next = NULL; chain_entry->ssd_next = NULL;
/* Find spot for the new subspace based on its sort key. */ /* Find spot for the new subspace based on its sort key. */
@ -5795,16 +5613,10 @@ create_new_subspace (space, name, loadable, code_only, common,
prev_chain_pointer = NULL; prev_chain_pointer = NULL;
while (chain_pointer) while (chain_pointer)
{
if (SUBSPACE_SORT (chain_pointer) <= SUBSPACE_SORT (chain_entry))
{ {
prev_chain_pointer = chain_pointer; prev_chain_pointer = chain_pointer;
chain_pointer = chain_pointer->ssd_next; chain_pointer = chain_pointer->ssd_next;
} }
else
break;
}
/* Now we have somewhere to put the new entry. Insert it and update /* Now we have somewhere to put the new entry. Insert it and update
the links. */ the links. */
@ -5851,21 +5663,7 @@ update_subspace (space, name, loadable, code_only, common, dup_common, sort,
{ {
ssd_chain_struct *chain_entry; ssd_chain_struct *chain_entry;
if ((chain_entry = is_defined_subspace (name))) chain_entry = is_defined_subspace (name);
{
SUBSPACE_ACCESS (chain_entry) = access;
SUBSPACE_LOADABLE (chain_entry) = loadable;
SUBSPACE_COMMON (chain_entry) = common;
SUBSPACE_DUP_COMM (chain_entry) = dup_common;
SUBSPACE_CODE_ONLY (chain_entry) = 1;
SUBSPACE_SORT (chain_entry) = sort;
SUBSPACE_ALIGN (chain_entry) = alignment;
SUBSPACE_QUADRANT (chain_entry) = quadrant;
SUBSPACE_SPACE_INDEX (chain_entry) = space_index;
SUBSPACE_ZERO (chain_entry) = zero;
}
else
chain_entry = NULL;
#ifdef obj_set_subsection_attributes #ifdef obj_set_subsection_attributes
obj_set_subsection_attributes (section, space->sd_seg, access, obj_set_subsection_attributes (section, space->sd_seg, access,
@ -6177,15 +5975,6 @@ pa_data (unused)
pa_undefine_label (); pa_undefine_label ();
} }
/* FIXME. What's the purpose of this pseudo-op? */
static void
pa_desc (unused)
int unused;
{
pa_undefine_label ();
}
/* Like float_cons, but we need to undefine our label. */ /* Like float_cons, but we need to undefine our label. */
static void static void
@ -6356,10 +6145,6 @@ hppa_elf_mark_end_of_function ()
else else
as_bad ("No memory for symbol name."); as_bad ("No memory for symbol name.");
/* Stuff away the location of the frag for the end of the function,
and call pa_build_unwind_subspace to add an entry in the unwind
table. */
last_call_info->end_frag = frag_now;
} }
/* Do any symbol processing requested by the target-cpu or target-format. */ /* Do any symbol processing requested by the target-cpu or target-format. */
@ -6410,8 +6195,6 @@ hppa_tc_make_sections (abfd)
bfd *abfd; bfd *abfd;
{ {
symext_chainS *symextP; symext_chainS *symextP;
int size, n;
asection *symextn_sec;
segT save_seg = now_seg; segT save_seg = now_seg;
subsegT save_subseg = now_subseg; subsegT save_subseg = now_subseg;
@ -6427,14 +6210,8 @@ hppa_tc_make_sections (abfd)
if (symext_rootP == NULL) if (symext_rootP == NULL)
return; return;
/* Count the number of symbols for the symbol extension section. */
for (n = 0, symextP = symext_rootP; symextP; symextP = symextP->next, ++n)
;
size = sizeof (symext_entryS) * n;
/* Switch to the symbol extension section. */ /* Switch to the symbol extension section. */
symextn_sec = subseg_new (SYMEXTN_SECTION_NAME, 0); subseg_new (SYMEXTN_SECTION_NAME, 0);
frag_wane (frag_now); frag_wane (frag_now);
frag_new (0); frag_new (0);
@ -6520,19 +6297,8 @@ pa_build_symextn_section ()
/* For ELF, this function serves one purpose: to setup the st_size /* For ELF, this function serves one purpose: to setup the st_size
field of STT_FUNC symbols. To do this, we need to scan the field of STT_FUNC symbols. To do this, we need to scan the
call_info structure list, determining st_size in one of two possible call_info structure list, determining st_size in by taking the
ways: difference in the address of the beginning/end marker symbols. */
1. call_info->start_frag->fr_fix has the size of the fragment.
This approach assumes that the function was built into a
single fragment. This works for most cases, but might fail.
For example, if there was a segment change in the middle of
the function.
2. The st_size field is the difference in the addresses of the
call_info->start_frag->fr_address field and the fr_address
field of the next fragment with fr_type == rs_fill and
fr_fix != 0. */
void void
elf_hppa_final_processing () elf_hppa_final_processing ()