* alpha.md (call_vms, call_value_vms): Strip leading * from symbol.
From-SVN: r20703
This commit is contained in:
parent
bc57e97056
commit
a59fb7979d
@ -1,3 +1,7 @@
|
||||
Wed Jun 24 17:55:15 1998 Klaus Kaempf <kkaempf@progis.de>
|
||||
|
||||
* alpha.md (call_vms, call_value_vms): Strip leading * from symbol.
|
||||
|
||||
Wed Jun 24 16:27:23 1998 John Carr <jfc@mit.edu>
|
||||
|
||||
* expr.c (get_memory_rtx): New function.
|
||||
|
@ -3553,10 +3553,13 @@
|
||||
if (GET_CODE (operands[0]) == SYMBOL_REF)
|
||||
{
|
||||
extern char *savealloc ();
|
||||
char *symbol = XSTR (operands[0], 0);
|
||||
char *linksym = savealloc (strlen (symbol) + 6);
|
||||
char *linksym, *symbol = XSTR (operands[0], 0);
|
||||
rtx linkage;
|
||||
|
||||
if (*symbol == '*')
|
||||
symbol++;
|
||||
linksym = savealloc (strlen (symbol) + 6);
|
||||
|
||||
alpha_need_linkage (symbol, 0);
|
||||
|
||||
linksym[0] = '$';
|
||||
@ -3658,10 +3661,13 @@
|
||||
if (GET_CODE (operands[1]) == SYMBOL_REF)
|
||||
{
|
||||
extern char *savealloc ();
|
||||
char *symbol = XSTR (operands[1], 0);
|
||||
char *linksym = savealloc (strlen (symbol) + 6);
|
||||
char *linksym, *symbol = XSTR (operands[1], 0);
|
||||
rtx linkage;
|
||||
|
||||
if (*symbol == '*')
|
||||
symbol++;
|
||||
linksym = savealloc (strlen (symbol) + 6);
|
||||
|
||||
alpha_need_linkage (symbol, 0);
|
||||
linksym[0] = '$';
|
||||
strcpy (linksym+1, symbol);
|
||||
|
Loading…
Reference in New Issue
Block a user