mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-03-11 20:27:30 +08:00
Code Issues Packages Projects Releases Wiki Activity

calls.c (expand_call): Don't bother generating tail call sequences if there are pending cleanups.

Browse Source 
* calls.c (expand_call): Don't bother generating tail call
        sequences if there are pending cleanups.  Use
        expand_start_target_temps/expand_end_target_temps to elide
        cleanups created during sibcall expansion.

From-SVN: r32653
This commit is contained in:
Richard Henderson 2000-03-20 14:40:50 -08:00 committed by Richard Henderson
parent e139e81e89
commit e245d3af6f
2 changed files with 23 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gcc/ChangeLog
View File

@ -1,3 +1,10 @@
2000-03-20 Richard Henderson <rth@cygnus.com>
* calls.c (expand_call): Don't bother generating tail call
sequences if there are pending cleanups. Use
expand_start_target_temps/expand_end_target_temps to elide
cleanups created during sibcall expansion.
2000-03-20 Geoff Keating <geoffk@cygnus.com> 2000-03-20 Geoff Keating <geoffk@cygnus.com>
* configure.in: Set $IFS to a value if it doesn't already have one * configure.in: Set $IFS to a value if it doesn't already have one

17
gcc/calls.c
View File

@ -2020,7 +2020,8 @@ expand_call (exp, target, ignore)
safe_for_reeval = 0; safe_for_reeval = 0;
if (optimize >= 2 if (optimize >= 2
&& currently_expanding_call == 1 && currently_expanding_call == 1
&& stmt_loop_nest_empty ()) && stmt_loop_nest_empty ()
&& ! any_pending_cleanups (1))
{ {
/* Verify that each argument is safe for re-evaluation. */ /* Verify that each argument is safe for re-evaluation. */
for (p = actparms; p; p = TREE_CHAIN (p)) for (p = actparms; p; p = TREE_CHAIN (p))
@ -2152,6 +2153,12 @@ expand_call (exp, target, ignore)
|| ! FUNCTION_OK_FOR_SIBCALL (fndecl)) || ! FUNCTION_OK_FOR_SIBCALL (fndecl))
continue; continue;
/* We know at this point that there are not currently any
pending cleanups. If, however, in the process of evaluating
the arguments we were to create some, we'll need to be
able to get rid of them. */
expand_start_target_temps ();
/* State variables we need to save and restore between /* State variables we need to save and restore between
iterations. */ iterations. */
save_pending_stack_adjust = pending_stack_adjust; save_pending_stack_adjust = pending_stack_adjust;
@ -2925,6 +2932,14 @@ expand_call (exp, target, ignore)
if (args[i].aligned_regs) if (args[i].aligned_regs)
free (args[i].aligned_regs); free (args[i].aligned_regs);
if (pass == 0)
{
/* Undo the fake expand_start_target_temps we did earlier. If
there had been any cleanups created, we've already set
sibcall_failure. */
expand_end_target_temps ();
}
insns = get_insns (); insns = get_insns ();
end_sequence (); end_sequence ();