darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

* symbols.c (symbol_create): If bfd_make_empty_symbol fails, call

Browse source 
as_perror rather than assert.
This commit is contained in:
Ian Lance Taylor 1996-05-28 17:33:23 +00:00
parent a4322a77b4
commit 943bdfdcce
2 changed files with 60 additions and 21 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gas/ChangeLog
View file

@ -1,3 +1,8 @@
Tue May 28 13:29:39 1996 Ian Lance Taylor <ian@cygnus.com>
* symbols.c (symbol_create): If bfd_make_empty_symbol fails, call
as_perror rather than assert.
Fri May 24 18:24:11 1996 Ian Lance Taylor <ian@cygnus.com>
* config/tc-mips.c (mips_ip): Mark sections created to hold

76
gas/symbols.c
View file

@ -1,5 +1,5 @@
/* symbols.c -symbol table-
Copyright (C) 1987, 1990, 1991, 1992, 1993, 1994
Copyright (C) 1987, 1990, 1991, 1992, 1993, 1994, 1995, 1996
Free Software Foundation, Inc.
This file is part of GAS, the GNU Assembler.
@ -129,7 +129,8 @@ symbol_create (name, segment, valu, frag)
#ifdef BFD_ASSEMBLER
symbolP->bsym = bfd_make_empty_symbol (stdoutput);
assert (symbolP->bsym != 0);
if (symbolP->bsym == NULL)
as_perror ("%s", "bfd_make_empty_symbol");
symbolP->bsym->udata.p = (PTR) symbolP;
#endif
S_SET_NAME (symbolP, preserved_copy_of_name);
@ -664,33 +665,37 @@ resolve_symbol_value (symp)
break;
}
#if 0 /* I thought this was needed for some of the i386-svr4 PIC
support, but it appears I was wrong, and it breaks rs6000
support. */
if (S_GET_SEGMENT (symp->sy_value.X_add_symbol) != undefined_section
&& S_GET_SEGMENT (symp->sy_value.X_add_symbol) != expr_section)
#endif
{
if (symp->sy_value.X_add_number == 0)
copy_symbol_attributes (symp, symp->sy_value.X_add_symbol);
if (symp->sy_value.X_add_number == 0)
copy_symbol_attributes (symp, symp->sy_value.X_add_symbol);
S_SET_VALUE (symp,
(symp->sy_value.X_add_number
+ symp->sy_frag->fr_address
+ S_GET_VALUE (symp->sy_value.X_add_symbol)));
if (S_GET_SEGMENT (symp) == expr_section
|| S_GET_SEGMENT (symp) == undefined_section)
S_SET_SEGMENT (symp,
S_GET_SEGMENT (symp->sy_value.X_add_symbol));
/* If we have equated this symbol to an undefined symbol, we
keep X_op set to O_symbol. This permits the routine
which writes out relocation to detect this case, and
convert the relocation to be against the symbol to which
this symbol is equated. */
if (! S_IS_DEFINED (symp) || S_IS_COMMON (symp))
symp->sy_value.X_op = O_symbol;
S_SET_VALUE (symp,
(symp->sy_value.X_add_number
+ symp->sy_frag->fr_address
+ S_GET_VALUE (symp->sy_value.X_add_symbol)));
if (S_GET_SEGMENT (symp) == expr_section
|| S_GET_SEGMENT (symp) == undefined_section)
S_SET_SEGMENT (symp,
S_GET_SEGMENT (symp->sy_value.X_add_symbol));
}
resolved = symp->sy_value.X_add_symbol->sy_resolved;
break;
case O_uminus:
case O_bit_not:
case O_logical_not:
resolve_symbol_value (symp->sy_value.X_add_symbol);
if (symp->sy_value.X_op == O_uminus)
val = - S_GET_VALUE (symp->sy_value.X_add_symbol);
else if (symp->sy_value.X_op == O_logical_not)
val = ! S_GET_VALUE (symp->sy_value.X_add_symbol);
else
val = ~ S_GET_VALUE (symp->sy_value.X_add_symbol);
S_SET_VALUE (symp,
@ -1194,7 +1199,22 @@ S_GET_VALUE (s)
if (!s->sy_resolved && !s->sy_resolving && s->sy_value.X_op != O_constant)
resolve_symbol_value (s);
if (s->sy_value.X_op != O_constant)
as_bad ("Attempt to get value of unresolved symbol %s", S_GET_NAME (s));
{
static symbolS *recur;
/* FIXME: In non BFD assemblers, S_IS_DEFINED and S_IS_COMMON
may call S_GET_VALUE. We use a static symbol to avoid the
immediate recursion. */
if (recur == s)
return (valueT) s->sy_value.X_add_number;
recur = s;
if (! s->sy_resolved
|| s->sy_value.X_op != O_symbol
|| (S_IS_DEFINED (s) && ! S_IS_COMMON (s)))
as_bad ("Attempt to get value of unresolved symbol %s",
S_GET_NAME (s));
recur = NULL;
}
return (valueT) s->sy_value.X_add_number;
}
@ -1241,6 +1261,13 @@ S_IS_EXTERNAL (s)
return (flags & BSF_GLOBAL) != 0;
}
int
S_IS_WEAK (s)
symbolS *s;
{
return (s->bsym->flags & BSF_WEAK) != 0;
}
int
S_IS_COMMON (s)
symbolS *s;
@ -1584,4 +1611,11 @@ print_expr (exp)
fprintf (stderr, "\n");
}
void
symbol_print_statistics (file)
FILE *file;
{
hash_print_statistics (file, "symbol table", sy_hash);
}
/* end of symbols.c */