From 422c8f6335c1381ed55dbeba4f24cb615ab4193e Mon Sep 17 00:00:00 2001 From: Richard Kenner Date: Mon, 10 Jan 1994 19:05:31 -0500 Subject: [PATCH] (preserve_rtl_expr_result): New function. From-SVN: r6367 --- gcc/function.c | 30 +++++++++++++++++++++++++++++- 1 file changed, 29 insertions(+), 1 deletion(-) diff --git a/gcc/function.c b/gcc/function.c index f0e62762b77..a57a8c037e8 100644 --- a/gcc/function.c +++ b/gcc/function.c @@ -1,5 +1,5 @@ /* Expands front end tree to back end RTL for GNU C-Compiler - Copyright (C) 1987, 88, 89, 91, 92, 1993 Free Software Foundation, Inc. + Copyright (C) 1987, 88, 89, 91, 92, 93, 1994 Free Software Foundation, Inc. This file is part of GNU CC. @@ -912,6 +912,34 @@ preserve_temp_slots (x) p->level--; } +/* X is the result of an RTL_EXPR. If it is a temporary slot associated + with that RTL_EXPR, promote it into a temporary slot at the present + level so it will not be freed when we free slots made in the + RTL_EXPR. */ + +void +preserve_rtl_expr_result (x) + rtx x; +{ + struct temp_slot *p; + + /* If X is not in memory or is at a constant address, it cannot be in + a temporary slot. */ + if (x == 0 || GET_CODE (x) != MEM || CONSTANT_P (XEXP (x, 0))) + return; + + /* If we can find a match, move it to our level. */ + for (p = temp_slots; p; p = p->next) + if (p->in_use && rtx_equal_p (x, p->slot)) + { + p->level = temp_slot_level; + p->rtl_expr = 0; + return; + } + + return; +} + /* Free all temporaries used so far. This is normally called at the end of generating code for a statement. Don't free any temporaries currently in use for an RTL_EXPR that hasn't yet been emitted. -- 2.30.2