diff options
| author | Jeff Law <law@gcc.gnu.org> | 1995-05-20 23:05:25 -0600 |
|---|---|---|
| committer | Jeff Law <law@gcc.gnu.org> | 1995-05-20 23:05:25 -0600 |
| commit | 4f6cd2e6422973675a9ac0468f7a4af1eb875db5 (patch) | |
| tree | ef93cdf2d8d124d9a7eab83b8c32ee00dad818ee /gcc | |
| parent | 034c1be0fdf231cecab4424e638060370b0cd7a1 (diff) | |
| download | gcc-4f6cd2e6422973675a9ac0468f7a4af1eb875db5.zip gcc-4f6cd2e6422973675a9ac0468f7a4af1eb875db5.tar.gz gcc-4f6cd2e6422973675a9ac0468f7a4af1eb875db5.tar.bz2 | |
pa.c (hppa_encode_label): New variable "permanent" to where/how memory is allocated for the new label.
* pa.c (hppa_encode_label): New variable "permanent" to
where/how memory is allocated for the new label. All
callers changed.
From-SVN: r9759
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/config/pa/pa.c | 17 | ||||
| -rw-r--r-- | gcc/config/pa/pa.h | 4 |
2 files changed, 16 insertions, 5 deletions
diff --git a/gcc/config/pa/pa.c b/gcc/config/pa/pa.c index be95729..b402396 100644 --- a/gcc/config/pa/pa.c +++ b/gcc/config/pa/pa.c @@ -4247,15 +4247,26 @@ extern struct obstack *saveable_obstack; /* In HPUX 8.0's shared library scheme, special relocations are needed for function labels if they might be passed to a function in a shared library (because shared libraries don't live in code - space), and special magic is needed to construct their address. */ + space), and special magic is needed to construct their address. + + For reasons too disgusting to describe storage for the new name + is allocated either on the saveable_obstack (released at function + exit) or via malloc for things that can never change (libcall names + for example). */ void -hppa_encode_label (sym) +hppa_encode_label (sym, permanent) rtx sym; + int permanent; { char *str = XSTR (sym, 0); int len = strlen (str); - char *newstr = obstack_alloc (saveable_obstack, len + 2) ; + char *newstr; + + if (permanent) + newstr = malloc (len + 2); + else + newstr = obstack_alloc (saveable_obstack, len + 2); if (str[0] == '*') *newstr++ = *str++; diff --git a/gcc/config/pa/pa.h b/gcc/config/pa/pa.h index 8ab2021..62a1ae8 100644 --- a/gcc/config/pa/pa.h +++ b/gcc/config/pa/pa.h @@ -1511,7 +1511,7 @@ do \ _rtl = TREE_CST_RTL (DECL); \ SYMBOL_REF_FLAG (XEXP (_rtl, 0)) = 1; \ if (TREE_CODE (DECL) == FUNCTION_DECL) \ - hppa_encode_label (XEXP (DECL_RTL (DECL), 0));\ + hppa_encode_label (XEXP (DECL_RTL (DECL), 0), 0);\ } \ } \ while (0) @@ -1897,7 +1897,7 @@ readonly_data () \ #define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, RTL) \ do { fputs ("\t.IMPORT ", FILE); \ if (!function_label_operand (RTL, VOIDmode)) \ - hppa_encode_label (RTL); \ + hppa_encode_label (RTL, 1); \ assemble_name (FILE, XSTR ((RTL), 0)); \ fputs (",CODE\n", FILE); \ } while (0) |