aboutsummaryrefslogtreecommitdiff
path: root/gas
diff options
context:
space:
mode:
authorIan Lance Taylor <ian@airs.com>1994-01-25 00:20:48 +0000
committerIan Lance Taylor <ian@airs.com>1994-01-25 00:20:48 +0000
commit0cafaab1f06f56a9cf47646bdeb8d56993b84d75 (patch)
treee3c589d4c23b61b2158aeb3b1f5e0cbd9f1de1ed /gas
parenta20bdb43f00dc9c85ce502b129acace410dbc22d (diff)
downloadfsf-binutils-gdb-0cafaab1f06f56a9cf47646bdeb8d56993b84d75.zip
fsf-binutils-gdb-0cafaab1f06f56a9cf47646bdeb8d56993b84d75.tar.gz
fsf-binutils-gdb-0cafaab1f06f56a9cf47646bdeb8d56993b84d75.tar.bz2
* symbols.c (S_IS_COMMON): Use bfd_is_com_section rather than
comparing against bfd_com_section.
Diffstat (limited to 'gas')
-rw-r--r--gas/symbols.c39
1 files changed, 31 insertions, 8 deletions
diff --git a/gas/symbols.c b/gas/symbols.c
index bf281e2..b63e6eb 100644
--- a/gas/symbols.c
+++ b/gas/symbols.c
@@ -119,7 +119,7 @@ symbol_new (name, segment, valu, frag)
symbolP->sy_frag = frag;
#ifndef BFD_ASSEMBLER
symbolP->sy_number = ~0;
- symbolP->sy_name_offset = ~0;
+ symbolP->sy_name_offset = (unsigned int) ~0;
#endif
/*
@@ -334,7 +334,7 @@ symbol_table_insert (symbolP)
know (symbolP);
know (S_GET_NAME (symbolP));
- if (*(error_string = hash_jam (sy_hash, S_GET_NAME (symbolP), (PTR) symbolP)))
+ if ((error_string = hash_jam (sy_hash, S_GET_NAME (symbolP), (PTR) symbolP)))
{
as_fatal ("Inserting \"%s\" into symbol table failed: %s",
S_GET_NAME (symbolP), error_string);
@@ -571,14 +571,19 @@ void
resolve_symbol_value (symp)
symbolS *symp;
{
+ int resolved;
+
if (symp->sy_resolved)
return;
+ resolved = 0;
+
if (symp->sy_resolving)
{
as_bad ("Symbol definition loop encountered at %s",
S_GET_NAME (symp));
S_SET_VALUE (symp, (valueT) 0);
+ resolved = 1;
}
else
{
@@ -596,6 +601,7 @@ resolve_symbol_value (symp)
S_SET_VALUE (symp, S_GET_VALUE (symp) + symp->sy_frag->fr_address);
if (S_GET_SEGMENT (symp) == expr_section)
S_SET_SEGMENT (symp, absolute_section);
+ resolved = 1;
break;
case O_symbol:
@@ -614,6 +620,8 @@ resolve_symbol_value (symp)
|| 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:
@@ -630,6 +638,7 @@ resolve_symbol_value (symp)
if (S_GET_SEGMENT (symp) == expr_section
|| S_GET_SEGMENT (symp) == undefined_section)
S_SET_SEGMENT (symp, absolute_section);
+ resolved = symp->sy_value.X_add_symbol->sy_resolved;
break;
case O_multiply:
@@ -681,17 +690,30 @@ resolve_symbol_value (symp)
if (S_GET_SEGMENT (symp) == expr_section
|| S_GET_SEGMENT (symp) == undefined_section)
S_SET_SEGMENT (symp, absolute_section);
+ resolved = (symp->sy_value.X_add_symbol->sy_resolved
+ && symp->sy_value.X_op_symbol->sy_resolved);
break;
case O_register:
case O_big:
case O_illegal:
- as_bad ("bad value for symbol \"%s\"", S_GET_NAME (symp));
+ /* Give an error (below) if not in expr_section. We don't
+ want to worry about expr_section symbols, because they
+ are fictional (they are created as part of expression
+ resolution), and any problems may not actually mean
+ anything. */
break;
}
}
- symp->sy_resolved = 1;
+ /* Don't worry if we can't resolve an expr_section symbol. */
+ if (resolved)
+ symp->sy_resolved = 1;
+ else if (S_GET_SEGMENT (symp) != expr_section)
+ {
+ as_bad ("can't resolve value for symbol \"%s\"", S_GET_NAME (symp));
+ symp->sy_resolved = 1;
+ }
}
#ifdef LOCAL_LABELS_DOLLAR
@@ -1093,6 +1115,7 @@ S_SET_VALUE (s, val)
{
s->sy_value.X_op = O_constant;
s->sy_value.X_add_number = (offsetT) val;
+ s->sy_value.X_unsigned = 0;
}
#ifdef BFD_ASSEMBLER
@@ -1104,17 +1127,17 @@ S_IS_EXTERNAL (s)
flagword flags = s->bsym->flags;
/* sanity check */
- if (flags & BSF_LOCAL && flags & (BSF_EXPORT | BSF_GLOBAL))
+ if (flags & BSF_LOCAL && flags & BSF_GLOBAL)
abort ();
- return (flags & (BSF_EXPORT | BSF_GLOBAL)) != 0;
+ return (flags & BSF_GLOBAL) != 0;
}
int
S_IS_COMMON (s)
symbolS *s;
{
- return s->bsym->section == &bfd_com_section;
+ return bfd_is_com_section (s->bsym->section);
}
int
@@ -1140,7 +1163,7 @@ S_IS_LOCAL (s)
flagword flags = s->bsym->flags;
/* sanity check */
- if (flags & BSF_LOCAL && flags & (BSF_EXPORT | BSF_GLOBAL))
+ if (flags & BSF_LOCAL && flags & BSF_GLOBAL)
abort ();
return (S_GET_NAME (s)