darlinghq/darling-gdb
1
0
Fork 0
mirror of https://github.com/darlinghq/darling-gdb.git synced 2024-11-26 13:30:30 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

* config/tc-ia64.c (dot_endp): Set function symbol sizes.

Browse Source 
* config/obj-elf.c (obj_elf_size): When size is constant, free
	and clear symbol_get_obj(sym)->size if any.
This commit is contained in:
Jakub Jelinek 2001-08-23 20:43:01 +00:00
parent 1a6fae3cf4
commit c538998c23
3 changed files with 60 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gas/ChangeLog
View File

@ -1,3 +1,9 @@
2001-08-23 Jakub Jelinek <jakub@redhat.com>
* config/tc-ia64.c (dot_endp): Set function symbol sizes.
* config/obj-elf.c (obj_elf_size): When size is constant, free
and clear symbol_get_obj(sym)->size if any.
2001-08-21 Thiemo Seufer <seufer@csv.ica.uni-stuttgart.de>
* tc_mips.c (md_begin): Warn about incompatibility between -march=FOO

9
gas/config/obj-elf.c
View File

@ -1453,7 +1453,14 @@ obj_elf_size (ignore)
sym = symbol_find_or_make (name);
*p = c;
if (exp.X_op == O_constant)
S_SET_SIZE (sym, exp.X_add_number);
{
S_SET_SIZE (sym, exp.X_add_number);
if (symbol_get_obj (sym)->size)
{
xfree (symbol_get_obj (sym)->size);
symbol_get_obj (sym)->size = NULL;
}
}
else
{
symbol_get_obj (sym)->size =

49
gas/config/tc-ia64.c
View File

@ -3841,6 +3841,8 @@ dot_endp (dummy)
segT saved_seg;
subsegT saved_subseg;
const char *sec_name, *text_name;
char *name, *p, c;
symbolS *sym;
if (unwind.saved_text_seg)
{
@ -3897,9 +3899,6 @@ dot_endp (dummy)
if (strcmp (text_name, ".text") == 0)
text_name = "";
expression (&e);
demand_empty_rest_of_line ();
insn_group_break (1, 0, 0);
/* If there wasn't a .handlerdata, we haven't generated an image yet. */
@ -3955,6 +3954,50 @@ dot_endp (dummy)
}
subseg_set (saved_seg, saved_subseg);
/* Parse names of main and alternate entry points and set symbol sizes. */
while (1)
{
SKIP_WHITESPACE ();
name = input_line_pointer;
c = get_symbol_end ();
p = input_line_pointer;
sym = symbol_find (name);
if (sym && unwind.proc_start
&& (symbol_get_bfdsym (sym)->flags & BSF_FUNCTION)
&& S_GET_SIZE (sym) == 0 && symbol_get_obj (sym)->size == NULL)
{
fragS *fr = symbol_get_frag (unwind.proc_start);
fragS *frag = symbol_get_frag (sym);
/* Check whether the function label is at or beyond last
.proc directive. */
while (fr && fr != frag)
fr = fr->fr_next;
if (fr)
{
if (frag == frag_now && SEG_NORMAL (now_seg))
S_SET_SIZE (sym, frag_now_fix () - S_GET_VALUE (sym));
else
{
symbol_get_obj (sym)->size =
(expressionS *) xmalloc (sizeof (expressionS));
symbol_get_obj (sym)->size->X_op = O_subtract;
symbol_get_obj (sym)->size->X_add_symbol
= symbol_new (FAKE_LABEL_NAME, now_seg,
frag_now_fix (), frag_now);
symbol_get_obj (sym)->size->X_op_symbol = sym;
symbol_get_obj (sym)->size->X_add_number = 0;
}
}
}
*p = c;
SKIP_WHITESPACE ();
if (*input_line_pointer != ',')
break;
++input_line_pointer;
}
demand_empty_rest_of_line ();
unwind.proc_start = unwind.proc_end = unwind.info = 0;
}