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

* mri.c, ldlang.c, ldlex.l, ldgram.y: add new keywords

Browse Source 
ALIGN, ALIGNMOD, and TRUNCATE.
	* ldsym.c: (hash_string, search, process_keepsyms): support
	truncation of symbols.
This commit is contained in:
Steve Chamberlain
1992-10-29 00:21:36 +00:00
parent aff6e0b45a
commit 0b5995da24
1 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
ld/ldsym.c
View File

@ -57,7 +57,7 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
#include "ldmisc.h" #include "ldmisc.h"
#include "ldlang.h" #include "ldlang.h"
/* IMPORT */ /* IMPORT */
extern int symbol_truncate;
extern bfd *output_bfd; extern bfd *output_bfd;
extern strip_symbols_type strip_symbols; extern strip_symbols_type strip_symbols;
extern discard_locals_type discard_locals; extern discard_locals_type discard_locals;
@ -100,12 +100,13 @@ DEFUN(hash_string,(key),
{ {
register CONST char *cp; register CONST char *cp;
register int k; register int k;
register int l = 0;
cp = key; cp = key;
k = 0; k = 0;
while (*cp) while (*cp && l < symbol_truncate) {
k = (((k << 1) + (k >> 14)) ^ (*cp++)) & 0x3fff; k = (((k << 1) + (k >> 14)) ^ (*cp++)) & 0x3fff;
l++;
}
return k; return k;
} }
@ -120,7 +121,7 @@ DEFUN(search,(key,hashval) ,
{ {
ldsym_type *bp; ldsym_type *bp;
for (bp = global_symbol_hash_table[hashval]; bp; bp = bp->link) for (bp = global_symbol_hash_table[hashval]; bp; bp = bp->link)
if (! strcmp (key, bp->name)) { if (! strncmp (key, bp->name, symbol_truncate)) {
if (bp->flags & SYM_INDIRECT) { if (bp->flags & SYM_INDIRECT) {
/* Use the symbol we're aliased to instead */ /* Use the symbol we're aliased to instead */
return (ldsym_type *)(bp->sdefs_chain); return (ldsym_type *)(bp->sdefs_chain);
@ -259,7 +260,7 @@ process_keepsyms (table, size)
*ptr-- = 0; *ptr-- = 0;
ptr = obstack_base (&obstack); ptr = obstack_base (&obstack);
for (sym = out; sym < end; sym++) for (sym = out; sym < end; sym++)
if (!strcmp ((*sym)->name, ptr)) if (!strncmp ((*sym)->name, ptr, symbol_truncate))
{ {
KEEP (sym); KEEP (sym);
found = 1; found = 1;