alpha.c (alpha_expand_prologue [OPEN_VMS_ABI]): Don't set FRP on stack adjustment for outgoing args if frame_pointer_needed.

* config/alpha/alpha.c (alpha_expand_prologue [OPEN_VMS_ABI]): Don't
	set FRP on stack adjustment for outgoing args if frame_pointer_needed.

From-SVN: r65965
This commit is contained in:
Olivier Hainque 2003-04-23 00:58:05 +02:00 committed by Richard Kenner
parent ae2196c28e
commit c1238896d3
2 changed files with 30 additions and 5 deletions

View File

@ -1,3 +1,8 @@
2003-04-22 Olivier Hainque <hainque@act-europe.fr>
* config/alpha/alpha.c (alpha_expand_prologue [OPEN_VMS_ABI]): Don't
set FRP on stack adjustment for outgoing args if frame_pointer_needed.
2003-04-22 Vincent Celier <celier@gnat.com>
* gthr-gnat.h, gthr-gnat.c: new sources for implementation of

View File

@ -7503,11 +7503,31 @@ alpha_expand_prologue ()
/* If we have to allocate space for outgoing args, do it now. */
if (current_function_outgoing_args_size != 0)
FRP (emit_move_insn
(stack_pointer_rtx,
plus_constant (hard_frame_pointer_rtx,
- (ALPHA_ROUND
(current_function_outgoing_args_size)))));
{
rtx seq
= emit_move_insn (stack_pointer_rtx,
plus_constant
(hard_frame_pointer_rtx,
- (ALPHA_ROUND
(current_function_outgoing_args_size))));
/* Only set FRAME_RELATED_P on the stack adjustment we just emitted
if ! frame_pointer_needed. Setting the bit will change the CFA
computation rule to use sp again, which would be wrong if we had
frame_pointer_needed, as this means sp might move unpredictably
later on.
Also, note that
frame_pointer_needed
=> vms_unwind_regno == HARD_FRAME_POINTER_REGNUM
and
current_function_outgoing_args_size != 0
=> alpha_procedure_type != PT_NULL,
so when we are not setting the bit here, we are guaranteed to
have emited an FRP frame pointer update just before. */
RTX_FRAME_RELATED_P (seq) = ! frame_pointer_needed;
}
}
else if (!TARGET_ABI_UNICOSMK)
{