diff options
| author | Klaus Kaempf <kkaempf@progis.de> | 1998-06-24 17:55:03 +0000 |
|---|---|---|
| committer | Richard Henderson <rth@gcc.gnu.org> | 1998-06-24 10:55:03 -0700 |
| commit | a59fb7979dfc98ecd0530be216fb237271af09ed (patch) | |
| tree | c8e3ac29e79662eb7f8da24f8f17a3ec4d5cc9bd /gcc | |
| parent | bc57e97056e7c9c11bdf97021cc5189d3d281d77 (diff) | |
| download | gcc-a59fb7979dfc98ecd0530be216fb237271af09ed.zip gcc-a59fb7979dfc98ecd0530be216fb237271af09ed.tar.gz gcc-a59fb7979dfc98ecd0530be216fb237271af09ed.tar.bz2 | |
* alpha.md (call_vms, call_value_vms): Strip leading * from symbol.
From-SVN: r20703
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/config/alpha/alpha.md | 14 |
2 files changed, 14 insertions, 4 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index b960111..2e7b800 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -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. diff --git a/gcc/config/alpha/alpha.md b/gcc/config/alpha/alpha.md index 65eacf7..dd8ce53 100644 --- a/gcc/config/alpha/alpha.md +++ b/gcc/config/alpha/alpha.md @@ -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); |