* [PATCH,AIX] Redesign section encoding and selection
@ 2021-05-01 2:05 David Edelsohn
0 siblings, 0 replies; only message in thread
From: David Edelsohn @ 2021-05-01 2:05 UTC (permalink / raw)
To: GCC Patches
[-- Attachment #1: Type: text/plain, Size: 3333 bytes --]
AIX symbol references can refer to either the symbol (a label) or a
symbol with a qualifier (the storage mapping class). The storage mapping
class provide information about the underlying COFF section into which the
symbol will be placed, e.g. [RO] for read-only in the text section,
[RW] for read-writer in the data section, or [BS] for the BSS section.
A label is distinct from a qualname in the assembler language, e.g.,
foo and foo[RW] are different, but the symbol table of an object file strips
the storage mapping class from the name, so it no longer is relevant
when referring to symbols across object files or libraries.
.csect .data[RW]
i:
is a label "i" in the .data CSECT, which has storage mapping class
[RW] so that it is placed in the read-write COFF section.
.csect i[RW]
is a CSECT "i[RW]". BSS does not allow interior labels.
The AIX port of GCC had been emitting the storage mapping class where
appropriate but not consistently using the storage mapping class on
the DECL or SYM name. This patch updates the section encoding to properly
place storage mapping class on symbol names and remove the decorations
placed when emitting the symbol.
The mapping classes correspond to sections and the encoding choices must
exactly match the section choices made by get_section, so the logic for
the computation of reloc in get_variable_section is split into its own
function that the XCOFF encode section info can call.
Bootstrapped on powerpc-ibm-aix7.2.3.0 and powerpc64le-linux.
gcc/ChangeLog:
* varasm.c (compute_reloc_for_var): Split out from...
(get_variable_section): Use it.
* output.h (compute_reloc_for_var): Declare.
* config/rs6000/rs6000-protos.h
(rs6000_xcoff_asm_output_aligned_decl_common): Change alignment to
unsigned int.
* config/rs6000/rs6000.c (rs6000_legitimize_tls_address_aix):
Don't append storage mapping class to symbol.
(rs6000_xcoff_asm_named_section): Add BS and UL mapping classes.
Don't convert TLS BSS to common.
(rs6000_xcoff_unique_section): Don't fall back to select_secton.
(rs6000_xcoff_section_type_flags): Add SECTION_BSS if DECL is
bss_initializer.
(rs6000_xcoff_asm_globalize_decl_name): Don't strip storage
mapping class.
(rs6000_xcoff_asm_output_aligned_decl_common): Align is unsigned int.
If align is 0 from TLS class, use the same rules as varasm.c
If not common, switch to BSS section manually.
If common, emit appropriate comm or lcomm directive.
(rs6000_xcoff_encode_section_info): Add logic to append all
storage mapping classes.
(rs6000_asm_weaken_decl): Adjust for qualname symbols.
* config/rs6000/xcoff.h (ASM_OUTPUT_ALIGNED_DECL_LOCAL): Use
rs6000_xcoff_asm_output_aligned_decl_common.
(ASM_OUTPUT_ALIGNED_DECL_LOCAL): Use
rs6000_xcoff_asm_output_aligned_decl_common.
(ASM_OUTPUT_TLS_COMMON): Use
rs6000_xcoff_asm_output_aligned_decl_common.
gcc/testsuite/ChangeLog:
* g++.dg/ext/visibility/fvisibility-inlines-hidden-4.C: Expect [BS]
mapping class on AIX.
* gcc.c-torture/compile/pr61159.c: XFAIL on AIX.
* gcc.c-torture/execute/alias-2.c: Same.
* gcc.dg/alias-7.c: Same.
[-- Attachment #2: 0001-aix-Redesign-section-encoding-and-selection.patch --]
[-- Type: application/octet-stream, Size: 19085 bytes --]
From a567dece45e32b2806a6fc9ed0a20c858a0e3001 Mon Sep 17 00:00:00 2001
From: David Edelsohn <dje.gcc@gmail.com>
Date: Tue, 6 Apr 2021 11:41:49 -0400
Subject: [PATCH] aix: Redesign section encoding and selection
AIX symbol references can reference either the symbol (a label) or a
symbol with a qualifier (the storage mapping class). The storage mapping
class provide information about the underlying COFF section into which the
CSECT will be placed, e.g. [RO] for read-only in the text section,
[RW] for read-writer in the data section, or [BS] for the BSS section.
A label is distinct from a qualname in the assembler language, e.g.,
foo and foo[RW] are different, but the symbol table of an object file strips
the storage mapping class from the name, so it no longer is relevant
when referring to symbols across object files or libraries.
.csect .data[RW]
i:
is a label "i"
.csect i[RW]
is a CSECT "i[RW]". BSS does not allow interior labels.
The AIX port of GCC had been emitting the storage mapping class where
appropriate but not consistently using the storage mapping class on
the DECL or SYM name. This patch updates the section encoding to properly
place storage mapping class on symbol names and remove the decorations
placed when emitting the symbol.
The mapping classes correspond to sections and the encoding choices must
exactly match the section choices made by get_section, so the logic for
the computation of reloc in get_variable_section is split into its own
function that the XCOFF encode section info can call.
gcc/ChangeLog:
* varasm.c (compute_reloc_for_var): Split out from...
(get_variable_section): Use it.
* output.h (compute_reloc_for_var): Declare.
* config/rs6000/rs6000-protos.h
(rs6000_xcoff_asm_output_aligned_decl_common): Change alignment to
unsigned int.
* config/rs6000/rs6000.c (rs6000_legitimize_tls_address_aix):
Don't append storage mapping class to symbol.
(rs6000_xcoff_asm_named_section): Add BS and UL mapping classes.
Don't convert TLS BSS to common.
(rs6000_xcoff_unique_section): Don't fall back to select_secton.
(rs6000_xcoff_section_type_flags): Add SECTION_BSS if DECL is
bss_initializer.
(rs6000_xcoff_asm_globalize_decl_name): Don't strip storage
mapping class.
(rs6000_xcoff_asm_output_aligned_decl_common): Align is unsigned int.
If align is 0 from TLS class, use the same rules as varasm.c
If not common, switch to BSS section manually.
If common, emit appropriate comm or lcomm directive.
(rs6000_xcoff_encode_section_info): Add logic to append all
storage mapping classes.
(rs6000_asm_weaken_decl): Adjust for qualname symbols.
* config/rs6000/xcoff.h (ASM_OUTPUT_ALIGNED_DECL_LOCAL): Use
rs6000_xcoff_asm_output_aligned_decl_common.
(ASM_OUTPUT_ALIGNED_DECL_LOCAL): Use
rs6000_xcoff_asm_output_aligned_decl_common.
(ASM_OUTPUT_TLS_COMMON): Use
rs6000_xcoff_asm_output_aligned_decl_common.
gcc/testsuite/ChangeLog:
* g++.dg/ext/visibility/fvisibility-inlines-hidden-4.C: Expect [BS]
mapping class on AIX.
* gcc.c-torture/compile/pr61159.c: XFAIL on AIX.
* gcc.c-torture/execute/alias-2.c: Same.
* gcc.dg/alias-7.c: Same.
---
gcc/config/rs6000/rs6000-protos.h | 2 +-
gcc/config/rs6000/rs6000.c | 162 +++++++++++-------
gcc/config/rs6000/xcoff.h | 44 +----
gcc/output.h | 1 +
.../visibility/fvisibility-inlines-hidden-4.C | 2 +-
gcc/testsuite/gcc.c-torture/compile/pr61159.c | 1 +
gcc/testsuite/gcc.c-torture/execute/alias-2.c | 1 +
gcc/testsuite/gcc.dg/alias-7.c | 1 +
gcc/varasm.c | 24 ++-
9 files changed, 126 insertions(+), 112 deletions(-)
diff --git a/gcc/config/rs6000/rs6000-protos.h b/gcc/config/rs6000/rs6000-protos.h
index a06a147c339..bef727e0a64 100644
--- a/gcc/config/rs6000/rs6000-protos.h
+++ b/gcc/config/rs6000/rs6000-protos.h
@@ -243,7 +243,7 @@ extern void rs6000_xcoff_declare_object_name (FILE *, const char *, tree);
extern void rs6000_xcoff_asm_output_aligned_decl_common (FILE *, tree,
const char *,
unsigned HOST_WIDE_INT,
- unsigned HOST_WIDE_INT);
+ unsigned int);
extern void rs6000_elf_declare_function_name (FILE *, const char *, tree);
extern bool rs6000_elf_in_small_data_p (const_tree);
diff --git a/gcc/config/rs6000/rs6000.c b/gcc/config/rs6000/rs6000.c
index 77181769e0b..7bdba4f113d 100644
--- a/gcc/config/rs6000/rs6000.c
+++ b/gcc/config/rs6000/rs6000.c
@@ -9311,29 +9311,12 @@ rs6000_got_sym (void)
static rtx
rs6000_legitimize_tls_address_aix (rtx addr, enum tls_model model)
{
- rtx sym, mem, tocref, tlsreg, tmpreg, dest, tlsaddr;
+ rtx sym, mem, tocref, tlsreg, tmpreg, dest;
const char *name;
char *tlsname;
- name = XSTR (addr, 0);
- /* Append TLS CSECT qualifier, unless the symbol already is qualified
- or the symbol will be in TLS private data section. */
- if (name[strlen (name) - 1] != ']'
- && (TREE_PUBLIC (SYMBOL_REF_DECL (addr))
- || bss_initializer_p (SYMBOL_REF_DECL (addr))))
- {
- tlsname = XALLOCAVEC (char, strlen (name) + 4);
- strcpy (tlsname, name);
- strcat (tlsname,
- bss_initializer_p (SYMBOL_REF_DECL (addr)) ? "[UL]" : "[TL]");
- tlsaddr = copy_rtx (addr);
- XSTR (tlsaddr, 0) = ggc_strdup (tlsname);
- }
- else
- tlsaddr = addr;
-
/* Place addr into TOC constant pool. */
- sym = force_const_mem (GET_MODE (tlsaddr), tlsaddr);
+ sym = force_const_mem (GET_MODE (addr), addr);
/* Output the TOC entry and create the MEM referencing the value. */
if (constant_pool_expr_p (XEXP (sym, 0))
@@ -21234,14 +21217,14 @@ rs6000_xcoff_reloc_rw_mask (void)
}
static void
-rs6000_xcoff_asm_named_section (const char *name, unsigned int flags,
- tree decl ATTRIBUTE_UNUSED)
+rs6000_xcoff_asm_named_section (const char *name, unsigned int flags, tree decl)
{
int smclass;
- static const char * const suffix[5] = { "PR", "RO", "RW", "TL", "XO" };
+ static const char * const suffix[7]
+ = { "PR", "RO", "RW", "BS", "TL", "UL", "XO" };
if (flags & SECTION_EXCLUDE)
- smclass = 4;
+ smclass = 6;
else if (flags & SECTION_DEBUG)
{
fprintf (asm_out_file, "\t.dwsect %s\n", name);
@@ -21250,9 +21233,19 @@ rs6000_xcoff_asm_named_section (const char *name, unsigned int flags,
else if (flags & SECTION_CODE)
smclass = 0;
else if (flags & SECTION_TLS)
- smclass = 3;
+ {
+ if (flags & SECTION_BSS)
+ smclass = 5;
+ else
+ smclass = 4;
+ }
else if (flags & SECTION_WRITE)
- smclass = 2;
+ {
+ if (flags & SECTION_BSS)
+ smclass = 3;
+ else
+ smclass = 2;
+ }
else
smclass = 1;
@@ -21291,11 +21284,7 @@ rs6000_xcoff_select_section (tree decl, int reloc,
if (TREE_CODE (decl) == VAR_DECL && DECL_THREAD_LOCAL_P (decl))
{
if (bss_initializer_p (decl))
- {
- /* Convert to COMMON to emit in BSS. */
- DECL_COMMON (decl) = 1;
- return tls_comm_section;
- }
+ return tls_comm_section;
else if (TREE_PUBLIC (decl))
return tls_data_section;
else
@@ -21315,17 +21304,6 @@ rs6000_xcoff_unique_section (tree decl, int reloc ATTRIBUTE_UNUSED)
{
const char *name;
- /* Use select_section for private data and uninitialized data with
- alignment <= BIGGEST_ALIGNMENT. */
- if (!TREE_PUBLIC (decl)
- || DECL_COMMON (decl)
- || (DECL_INITIAL (decl) == NULL_TREE
- && DECL_ALIGN (decl) <= BIGGEST_ALIGNMENT)
- || DECL_INITIAL (decl) == error_mark_node
- || (flag_zero_initialized_in_bss
- && initializer_zerop (DECL_INITIAL (decl))))
- return;
-
name = IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (decl));
name = (*targetm.strip_name_encoding) (name);
set_decl_section_name (decl, name);
@@ -21370,6 +21348,9 @@ rs6000_xcoff_section_type_flags (tree decl, const char *name, int reloc)
unsigned int align;
unsigned int flags = default_section_type_flags (decl, name, reloc);
+ if (decl && DECL_P (decl) && VAR_P (decl) && bss_initializer_p (decl))
+ flags |= SECTION_BSS;
+
/* Align to at least UNIT size. */
if ((flags & SECTION_CODE) != 0 || !decl || !DECL_P (decl))
align = MIN_UNITS_PER_WORD;
@@ -21632,7 +21613,7 @@ rs6000_xcoff_asm_globalize_decl_name (FILE *stream, tree decl)
{
const char *name = XSTR (XEXP (DECL_RTL (decl), 0), 0);
fputs (GLOBAL_ASM_OP, stream);
- RS6000_OUTPUT_BASENAME (stream, name);
+ assemble_name (stream, name);
#ifdef HAVE_GAS_HIDDEN
fputs (rs6000_xcoff_visibility (decl), stream);
#endif
@@ -21647,27 +21628,50 @@ rs6000_xcoff_asm_output_aligned_decl_common (FILE *stream,
tree decl ATTRIBUTE_UNUSED,
const char *name,
unsigned HOST_WIDE_INT size,
- unsigned HOST_WIDE_INT align)
+ unsigned int align)
{
- unsigned HOST_WIDE_INT align2 = 2;
+ unsigned int align2 = 2;
+
+ if (align == 0)
+ align = DATA_ABI_ALIGNMENT (TREE_TYPE (decl), DECL_ALIGN (decl));
if (align > 32)
align2 = floor_log2 (align / BITS_PER_UNIT);
else if (size > 4)
align2 = 3;
- fputs (COMMON_ASM_OP, stream);
- RS6000_OUTPUT_BASENAME (stream, name);
+ if (! DECL_COMMON (decl))
+ {
+ /* Forget section. */
+ in_section = NULL;
+
+ /* Globalize TLS BSS. */
+ if (TREE_PUBLIC (decl) && DECL_THREAD_LOCAL_P (decl))
+ fprintf (stream, "\t.globl %s\n", name);
- fprintf (stream,
- "," HOST_WIDE_INT_PRINT_UNSIGNED "," HOST_WIDE_INT_PRINT_UNSIGNED,
- size, align2);
+ /* Switch to section and skip space. */
+ fprintf (stream, "\t.csect %s,%u\n", name, align2);
+ ASM_DECLARE_OBJECT_NAME (stream, name, decl);
+ ASM_OUTPUT_SKIP (stream, size ? size : 1);
+ return;
+ }
+
+ if (TREE_PUBLIC (decl))
+ {
+ fprintf (stream,
+ "\t.comm %s," HOST_WIDE_INT_PRINT_UNSIGNED ",%u" ,
+ name, size, align2);
#ifdef HAVE_GAS_HIDDEN
- if (decl != NULL)
- fputs (rs6000_xcoff_visibility (decl), stream);
+ if (decl != NULL)
+ fputs (rs6000_xcoff_visibility (decl), stream);
#endif
- putc ('\n', stream);
+ putc ('\n', stream);
+ }
+ else
+ fprintf (stream,
+ "\t.lcomm %s," HOST_WIDE_INT_PRINT_UNSIGNED ",%s,%u\n",
+ (*targetm.strip_name_encoding) (name), size, name, align2);
}
/* This macro produces the initial definition of a object (variable) name.
@@ -21733,19 +21737,49 @@ rs6000_xcoff_encode_section_info (tree decl, rtx rtl, int first)
SYMBOL_REF_FLAGS (symbol) = flags;
- /* Append mapping class to extern decls. */
symname = XSTR (symbol, 0);
- if (decl /* sync condition with assemble_external () */
- && DECL_P (decl) && DECL_EXTERNAL (decl) && TREE_PUBLIC (decl)
- && ((TREE_CODE (decl) == VAR_DECL && !DECL_THREAD_LOCAL_P (decl))
- || TREE_CODE (decl) == FUNCTION_DECL)
+
+ /* Append CSECT mapping class, unless the symbol already is qualified. */
+ if (decl
+ && DECL_P (decl)
+ && VAR_OR_FUNCTION_DECL_P (decl)
+ && lookup_attribute ("alias", DECL_ATTRIBUTES (decl)) == NULL_TREE
&& symname[strlen (symname) - 1] != ']')
{
- char *newname = (char *) alloca (strlen (symname) + 5);
- strcpy (newname, symname);
- strcat (newname, (TREE_CODE (decl) == FUNCTION_DECL
- ? "[DS]" : "[UA]"));
- XSTR (symbol, 0) = ggc_strdup (newname);
+ const char *smclass = NULL;
+
+ if (TREE_CODE (decl) == FUNCTION_DECL)
+ {
+ if (DECL_EXTERNAL (decl))
+ smclass = "[DS]";
+ }
+ else if (DECL_THREAD_LOCAL_P (decl))
+ {
+ if (bss_initializer_p (decl))
+ smclass = "[UL]";
+ else if (flag_data_sections)
+ smclass = "[TL]";
+ }
+ else if (DECL_EXTERNAL (decl))
+ smclass = "[UA]";
+ else if (bss_initializer_p (decl))
+ smclass = "[BS]";
+ else if (flag_data_sections)
+ {
+ if (decl_readonly_section (decl, compute_reloc_for_var (decl)))
+ smclass = "[RO]";
+ else
+ smclass = "[RW]";
+ }
+
+ if (smclass != NULL)
+ {
+ char *newname = XALLOCAVEC (char, strlen (symname) + 5);
+
+ strcpy (newname, symname);
+ strcat (newname, smclass);
+ XSTR (symbol, 0) = ggc_strdup (newname);
+ }
}
}
#endif /* HAVE_AS_TLS */
@@ -21756,11 +21790,11 @@ rs6000_asm_weaken_decl (FILE *stream, tree decl,
const char *name, const char *val)
{
fputs ("\t.weak\t", stream);
- RS6000_OUTPUT_BASENAME (stream, name);
+ assemble_name (stream, name);
if (decl && TREE_CODE (decl) == FUNCTION_DECL
&& DEFAULT_ABI == ABI_AIX && DOT_SYMBOLS)
{
- if (TARGET_XCOFF)
+ if (TARGET_XCOFF && name[strlen (name) - 1] != ']')
fputs ("[DS]", stream);
#if TARGET_XCOFF && HAVE_GAS_HIDDEN
if (TARGET_XCOFF)
diff --git a/gcc/config/rs6000/xcoff.h b/gcc/config/rs6000/xcoff.h
index c01667809a5..5ba565f63bb 100644
--- a/gcc/config/rs6000/xcoff.h
+++ b/gcc/config/rs6000/xcoff.h
@@ -104,6 +104,8 @@
#define TARGET_ENCODE_SECTION_INFO rs6000_xcoff_encode_section_info
#endif
#define ASM_OUTPUT_ALIGNED_DECL_COMMON rs6000_xcoff_asm_output_aligned_decl_common
+#define ASM_OUTPUT_ALIGNED_DECL_LOCAL rs6000_xcoff_asm_output_aligned_decl_common
+#define ASM_OUTPUT_ALIGNED_BSS rs6000_xcoff_asm_output_aligned_decl_common
/* FP save and restore routines. */
#define SAVE_FP_PREFIX "._savef"
@@ -218,48 +220,12 @@
to define a global common symbol. */
#define COMMON_ASM_OP "\t.comm "
-
-/* This says how to output an assembler line
- to define a local common symbol.
- The assembler in AIX 6.1 and later supports an alignment argument.
- For earlier releases of AIX, we try to maintain
- alignment after preceding TOC section if it was aligned
- for 64-bit mode. */
-
#define LOCAL_COMMON_ASM_OP "\t.lcomm "
-#if TARGET_AIX_VERSION >= 61
-#define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN) \
- do { fputs (LOCAL_COMMON_ASM_OP, (FILE)); \
- RS6000_OUTPUT_BASENAME ((FILE), (NAME)); \
- if ((ALIGN) > 32) \
- fprintf ((FILE), "," HOST_WIDE_INT_PRINT_UNSIGNED",%s%u_,%u\n", \
- (SIZE), xcoff_bss_section_name, \
- floor_log2 ((ALIGN) / BITS_PER_UNIT), \
- floor_log2 ((ALIGN) / BITS_PER_UNIT)); \
- else if ((SIZE) > 4) \
- fprintf ((FILE), "," HOST_WIDE_INT_PRINT_UNSIGNED",%s3_,3\n", \
- (SIZE), xcoff_bss_section_name); \
- else \
- fprintf ((FILE), "," HOST_WIDE_INT_PRINT_UNSIGNED",%s,2\n", \
- (SIZE), xcoff_bss_section_name); \
- } while (0)
-#endif
-
-#define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED) \
- do { fputs (LOCAL_COMMON_ASM_OP, (FILE)); \
- RS6000_OUTPUT_BASENAME ((FILE), (NAME)); \
- fprintf ((FILE), "," HOST_WIDE_INT_PRINT_UNSIGNED",%s\n", \
- (TARGET_32BIT ? (SIZE) : (ROUNDED)), \
- xcoff_bss_section_name); \
- } while (0)
-
#ifdef HAVE_AS_TLS
-#define ASM_OUTPUT_TLS_COMMON(FILE, DECL, NAME, SIZE) \
- do { fputs (COMMON_ASM_OP, (FILE)); \
- RS6000_OUTPUT_BASENAME ((FILE), (NAME)); \
- fprintf ((FILE), "[UL]," HOST_WIDE_INT_PRINT_UNSIGNED"\n", \
- (SIZE)); \
+#define ASM_OUTPUT_TLS_COMMON(FILE, DECL, NAME, SIZE) \
+ do { \
+ rs6000_xcoff_asm_output_aligned_decl_common ((FILE), (DECL), (NAME), (SIZE), 0); \
} while (0)
#endif
diff --git a/gcc/output.h b/gcc/output.h
index 2bfeed93c56..3752e15a455 100644
--- a/gcc/output.h
+++ b/gcc/output.h
@@ -348,6 +348,7 @@ extern bool decl_readonly_section (const_tree, int);
/* This can be used to compute RELOC for the function above, when
given a constant expression. */
extern int compute_reloc_for_constant (tree);
+extern int compute_reloc_for_var (tree);
/* User label prefix in effect for this compilation. */
extern const char *user_label_prefix;
diff --git a/gcc/testsuite/g++.dg/ext/visibility/fvisibility-inlines-hidden-4.C b/gcc/testsuite/g++.dg/ext/visibility/fvisibility-inlines-hidden-4.C
index ebce2ba5c7b..0450af5c40c 100644
--- a/gcc/testsuite/g++.dg/ext/visibility/fvisibility-inlines-hidden-4.C
+++ b/gcc/testsuite/g++.dg/ext/visibility/fvisibility-inlines-hidden-4.C
@@ -6,7 +6,7 @@
/* { dg-final { scan-not-hidden "_ZZ3barvE1n" } } */
/* { dg-final { scan-not-hidden "_Z3fooIiEvv" } } */
/* { dg-final { scan-hidden "_Z3fooIvEvv" } } */
-/* { dg-final { scan-hidden "_ZZN1A5innerEvE1n" } } */
+/* { dg-final { scan-hidden "_ZZN1A5innerEvE1n(\\\[BS\\\])?" } } */
inline int * bar()
{
diff --git a/gcc/testsuite/gcc.c-torture/compile/pr61159.c b/gcc/testsuite/gcc.c-torture/compile/pr61159.c
index 5afa6eaa4d5..dadd9c08444 100644
--- a/gcc/testsuite/gcc.c-torture/compile/pr61159.c
+++ b/gcc/testsuite/gcc.c-torture/compile/pr61159.c
@@ -1,5 +1,6 @@
/* { dg-require-alias "" } */
/* { dg-require-weak "" } */
+/* { dg-xfail-if "weak alias" { powerpc-ibm-aix* } } */
static int dummy = 0;
extern int foo __attribute__((__weak__, __alias__("dummy")));
diff --git a/gcc/testsuite/gcc.c-torture/execute/alias-2.c b/gcc/testsuite/gcc.c-torture/execute/alias-2.c
index c62d5068ee9..6aeb0c23e86 100644
--- a/gcc/testsuite/gcc.c-torture/execute/alias-2.c
+++ b/gcc/testsuite/gcc.c-torture/execute/alias-2.c
@@ -1,4 +1,5 @@
/* { dg-require-alias "" } */
+/* { dg-skip-if "BSS alias" { powerpc-ibm-aix* } } */
int a[10]={};
extern int b[10] __attribute__ ((alias("a")));
int off;
diff --git a/gcc/testsuite/gcc.dg/alias-7.c b/gcc/testsuite/gcc.dg/alias-7.c
index 591c3028e03..e0c24bd63a2 100644
--- a/gcc/testsuite/gcc.dg/alias-7.c
+++ b/gcc/testsuite/gcc.dg/alias-7.c
@@ -1,6 +1,7 @@
/* { dg-do run } */
/* { dg-require-alias "" } */
/* { dg-options "-O2" } */
+/* { dg-skip-if "weak alias" { powerpc-ibm-aix* } } */
extern void abort (void);
diff --git a/gcc/varasm.c b/gcc/varasm.c
index ac256ef65e5..b5d6e649d81 100644
--- a/gcc/varasm.c
+++ b/gcc/varasm.c
@@ -1202,6 +1202,21 @@ get_variable_align (tree decl)
return align;
}
+int
+compute_reloc_for_var (tree decl)
+{
+ int reloc;
+
+ if (DECL_INITIAL (decl) == error_mark_node)
+ reloc = contains_pointers_p (TREE_TYPE (decl)) ? 3 : 0;
+ else if (DECL_INITIAL (decl))
+ reloc = compute_reloc_for_constant (DECL_INITIAL (decl));
+ else
+ reloc = 0;
+
+ return reloc;
+}
+
/* Return the section into which the given VAR_DECL or CONST_DECL
should be placed. PREFER_NOSWITCH_P is true if a noswitch
section should be used wherever possible. */
@@ -1239,12 +1254,7 @@ get_variable_section (tree decl, bool prefer_noswitch_p)
return comm_section;
}
- if (DECL_INITIAL (decl) == error_mark_node)
- reloc = contains_pointers_p (TREE_TYPE (decl)) ? 3 : 0;
- else if (DECL_INITIAL (decl))
- reloc = compute_reloc_for_constant (DECL_INITIAL (decl));
- else
- reloc = 0;
+ reloc = compute_reloc_for_var (decl);
resolve_unique_section (decl, reloc, flag_data_sections);
if (IN_NAMED_SECTION (decl))
@@ -7254,7 +7264,7 @@ compute_reloc_for_rtx_1 (const_rtx x)
is a mask for which bit 1 indicates a global relocation, and bit 0
indicates a local relocation. */
-static int
+int
compute_reloc_for_rtx (const_rtx x)
{
switch (GET_CODE (x))
--
2.20.4
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2021-05-01 2:05 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2021-05-01 2:05 [PATCH,AIX] Redesign section encoding and selection David Edelsohn
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).