diff options
| author | Alan Modra <amodra@bigpond.net.au> | 2009-09-23 06:10:08 +0000 |
|---|---|---|
| committer | Alan Modra <amodra@bigpond.net.au> | 2009-09-23 06:10:08 +0000 |
| commit | ed6db07f019915ec7a85811508b70f4730e72249 (patch) | |
| tree | 731c2fdc83e818f6b9c64aa55eccd969f33ee3c0 /gas/symbols.c | |
| parent | 7b86b38aff065026fa24e79183f68965bc4c01e8 (diff) | |
| download | binutils-redhat-ed6db07f019915ec7a85811508b70f4730e72249.tar.gz | |
* symbols.c (define_sym_at_dot): New function, extracted from..
(colon): ..here. Define error case cloned symbol.
Diffstat (limited to 'gas/symbols.c')
| -rw-r--r-- | gas/symbols.c | 26 |
1 files changed, 14 insertions, 12 deletions
diff --git a/gas/symbols.c b/gas/symbols.c index 61623189cb..304a1eeb6e 100644 --- a/gas/symbols.c +++ b/gas/symbols.c @@ -246,6 +246,17 @@ local_symbol_convert (struct local_symbol *locsym) return ret; } +static void +define_sym_at_dot (symbolS *symbolP) +{ + symbolP->sy_frag = frag_now; +#ifdef OBJ_VMS + S_SET_OTHER (symbolP, const_flag); +#endif + S_SET_VALUE (symbolP, (valueT) frag_now_fix ()); + S_SET_SEGMENT (symbolP, now_seg); +} + /* We have just seen "<name>:". Creates a struct symbol unless it already exists. @@ -343,12 +354,7 @@ colon (/* Just seen "x:" - rattle symbols & frags. */ } if (S_GET_VALUE (symbolP) == 0) { - symbolP->sy_frag = frag_now; -#ifdef OBJ_VMS - S_SET_OTHER (symbolP, const_flag); -#endif - S_SET_VALUE (symbolP, (valueT) frag_now_fix ()); - S_SET_SEGMENT (symbolP, now_seg); + define_sym_at_dot (symbolP); #ifdef N_UNDF know (N_UNDF == 0); #endif /* if we have one, it better be zero. */ @@ -393,12 +399,7 @@ colon (/* Just seen "x:" - rattle symbols & frags. */ { /* It is a .comm/.lcomm being converted to initialized data. */ - symbolP->sy_frag = frag_now; -#ifdef OBJ_VMS - S_SET_OTHER (symbolP, const_flag); -#endif - S_SET_VALUE (symbolP, (valueT) frag_now_fix ()); - S_SET_SEGMENT (symbolP, now_seg); /* Keep N_EXT bit. */ + define_sym_at_dot (symbolP); } } else @@ -431,6 +432,7 @@ colon (/* Just seen "x:" - rattle symbols & frags. */ { as_bad (_("symbol `%s' is already defined"), sym_name); symbolP = symbol_clone (symbolP, 0); + define_sym_at_dot (symbolP); } } |