procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

s390.c (s390_loadrelative_operand_p): New function.

Browse source 
2012-09-03  Andreas Krebbel  <Andreas.Krebbel@de.ibm.com>

	* config/s390/s390.c (s390_loadrelative_operand_p): New function.
	(s390_check_qrst_address, print_operand_address): Use
	s390_loadrelative_operand_p instead of s390_symref_operand_p.
	(s390_check_symref_alignment): Accept pointer size alignment for GOT slots.
	(legitimize_pic_address): Use load relative on z10 or later.

From-SVN: r190884
This commit is contained in:
Andreas Krebbel 2012-09-03 11:46:56 +00:00 • committed by Andreas Krebbel
parent d540153b67
commit 98412b775b
2 changed files with 40 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
gcc/ChangeLog
View file

@ -1,3 +1,11 @@
2012-09-03 Andreas Krebbel <Andreas.Krebbel@de.ibm.com>
* config/s390/s390.c (s390_loadrelative_operand_p): New function.
(s390_check_qrst_address, print_operand_address): Use
s390_loadrelative_operand_p instead of s390_symref_operand_p.
(s390_check_symref_alignment): Accept pointer size alignment for GOT slots.
(legitimize_pic_address): Use load relative on z10 or later.
2012-09-03 Jakub Jelinek <jakub@redhat.com>
PR debug/53923

36
gcc/config/s390/s390.c
View file

@ -2123,6 +2123,22 @@ s390_symref_operand_p (rtx addr, rtx *symref, HOST_WIDE_INT *addend)
return true;
}
/* Return TRUE if ADDR is an operand valid for a load/store relative
instructions. Be aware that the alignment of the operand needs to
be checked separately. */
static bool
s390_loadrelative_operand_p (rtx addr)
{
if (GET_CODE (addr) == CONST)
addr = XEXP (addr, 0);
/* Enable load relative for symbol@GOTENT. */
if (GET_CODE (addr) == UNSPEC
&& XINT (addr, 1) == UNSPEC_GOTENT)
return true;
return s390_symref_operand_p (addr, NULL, NULL);
}
/* Return true if the address in OP is valid for constraint letter C
if wrapped in a MEM rtx. Set LIT_POOL_OK to true if it literal
@ -2137,7 +2153,7 @@ s390_check_qrst_address (char c, rtx op, bool lit_pool_ok)
/* This check makes sure that no symbolic address (except literal
pool references) are accepted by the R or T constraints. */
if (s390_symref_operand_p (op, NULL, NULL))
if (s390_loadrelative_operand_p (op))
return 0;
/* Ensure literal pool references are only accepted if LIT_POOL_OK. */
@ -2941,6 +2957,13 @@ s390_check_symref_alignment (rtx addr, HOST_WIDE_INT alignment)
HOST_WIDE_INT addend;
rtx symref;
/* Accept symbol@GOTENT with pointer size alignment. */
if (GET_CODE (addr) == CONST
&& GET_CODE (XEXP (addr, 0)) == UNSPEC
&& XINT (XEXP (addr, 0), 1) == UNSPEC_GOTENT
&& alignment <= UNITS_PER_LONG)
return true;
if (!s390_symref_operand_p (addr, &symref, &addend))
return false;
@ -3398,9 +3421,14 @@ legitimize_pic_address (rtx orig, rtx reg)
new_rtx = gen_rtx_UNSPEC (Pmode, gen_rtvec (1, addr), UNSPEC_GOTENT);
new_rtx = gen_rtx_CONST (Pmode, new_rtx);
emit_move_insn (temp, new_rtx);
new_rtx = gen_const_mem (Pmode, temp);
if (!TARGET_Z10)
{
emit_move_insn (temp, new_rtx);
new_rtx = gen_const_mem (Pmode, temp);
}
else
new_rtx = gen_const_mem (GET_MODE (reg), new_rtx);
emit_move_insn (reg, new_rtx);
new_rtx = reg;
}
@ -5250,7 +5278,7 @@ print_operand_address (FILE *file, rtx addr)
{
struct s390_address ad;
if (s390_symref_operand_p (addr, NULL, NULL))
if (s390_loadrelative_operand_p (addr))
{
if (!TARGET_Z10)
{