OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

rs6000.c (rs6000_unique_section): Simplify and correct code selecting section. 

* config/rs6000/rs6000.c (rs6000_unique_section): Simplify and
	correct code selecting section.

From-SVN: r47714
This commit is contained in:
Alan Modra 2001-12-06 11:56:34 +00:00 committed by Alan Modra
parent 8456b95a5a
commit 5b8c23564e
2 changed files with 44 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ChangeLog
View File

@ -1,3 +1,8 @@
2001-12-06 Alan Modra <amodra@bigpond.net.au>
* config/rs6000/rs6000.c (rs6000_unique_section): Simplify and
correct code selecting section.
Thu Dec 6 12:45:33 CET 2001 Jan Hubicka <jh@suse.cz>
* final.c (count_basic_block, add_bb, add_bb_string):

67
gcc/config/rs6000/rs6000.c
View File

@ -9746,9 +9746,6 @@ rs6000_unique_section (decl, reloc)
tree decl;
int reloc;
{
int size = int_size_in_bytes (TREE_TYPE (decl));
int needs_sdata;
int readonly;
int len;
int sec;
const char *name;
@ -9757,40 +9754,54 @@ rs6000_unique_section (decl, reloc)
static const char *const prefixes[7][2] =
{
{ ".text.", ".gnu.linkonce.t." },
{ ".rodata.", ".gnu.linkonce.r." },
{ ".sdata2.", ".gnu.linkonce.s2." },
{ ".data.", ".gnu.linkonce.d." },
{ ".sdata.", ".gnu.linkonce.s." },
{ ".bss.", ".gnu.linkonce.b." },
{ ".sbss.", ".gnu.linkonce.sb." }
{ ".sbss.", ".gnu.linkonce.sb." },
{ ".text.", ".gnu.linkonce.t." }
};
needs_sdata = (TREE_CODE (decl) != FUNCTION_DECL
&& size > 0
&& size <= g_switch_value
&& rs6000_sdata != SDATA_NONE
&& (rs6000_sdata != SDATA_DATA || TREE_PUBLIC (decl)));
if (TREE_CODE (decl) == STRING_CST)
readonly = ! flag_writable_strings;
else if (TREE_CODE (decl) == VAR_DECL)
readonly = (! (flag_pic && reloc)
&& TREE_READONLY (decl)
&& ! TREE_SIDE_EFFECTS (decl)
&& DECL_INITIAL (decl)
&& DECL_INITIAL (decl) != error_mark_node
&& TREE_CONSTANT (DECL_INITIAL (decl)));
if (TREE_CODE (decl) == FUNCTION_DECL)
sec = 6;
else
readonly = 1;
if (needs_sdata && rs6000_sdata != SDATA_EABI)
readonly = 0;
{
int readonly;
int needs_sdata;
int size;
sec = ((TREE_CODE (decl) == FUNCTION_DECL ? 0 : 1)
+ (readonly ? 0 : 2)
+ (needs_sdata ? 1 : 0)
+ (DECL_INITIAL (decl) == 0
|| DECL_INITIAL (decl) == error_mark_node) ? 4 : 0);
readonly = 1;
if (TREE_CODE (decl) == STRING_CST)
readonly = ! flag_writable_strings;
else if (TREE_CODE (decl) == VAR_DECL)
readonly = (! (flag_pic && reloc)
&& TREE_READONLY (decl)
&& ! TREE_SIDE_EFFECTS (decl)
&& TREE_CONSTANT (DECL_INITIAL (decl)));
size = int_size_in_bytes (TREE_TYPE (decl));
needs_sdata = (size > 0
&& size <= g_switch_value
&& rs6000_sdata != SDATA_NONE
&& (rs6000_sdata != SDATA_DATA || TREE_PUBLIC (decl)));
if (DECL_INITIAL (decl) == 0
|| DECL_INITIAL (decl) == error_mark_node)
sec = 4;
else if (! readonly)
sec = 2;
else
sec = 0;
if (needs_sdata)
{
/* .sdata2 is only for EABI. */
if (sec == 0 && rs6000_sdata != SDATA_EABI)
sec = 2;
sec += 1;
}
}
STRIP_NAME_ENCODING (name, IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (decl)));
prefix = prefixes[sec][DECL_ONE_ONLY (decl)];