re PR middle-end/5154 (GCC 3.0.2 crashes when compiling a HUGE function)

PR c/5154
        * ggc-common.c (ggc_mark_rtx_children_1): Rename from...
        (ggc_mark_rtx_children): New.

From-SVN: r52862
This commit is contained in:
Richard Henderson 2002-04-28 13:35:54 -07:00 committed by Richard Henderson
parent f52b318c77
commit e2ab4c390a
2 changed files with 44 additions and 0 deletions

View File

@ -1,3 +1,9 @@
2002-04-28 Richard Henderson <rth@redhat.com>
PR c/5154
* ggc-common.c (ggc_mark_rtx_children_1): Rename from...
(ggc_mark_rtx_children): New.
2002-04-28 Franz Sirl <Franz.Sirl-kernel@lauterbach.com>
PR c/6497

View File

@ -43,6 +43,7 @@ void (*lang_mark_false_label_stack) PARAMS ((struct label_node *));
/* Trees that have been marked, but whose children still need marking. */
varray_type ggc_pending_trees;
static void ggc_mark_rtx_children_1 PARAMS ((rtx));
static void ggc_mark_rtx_ptr PARAMS ((void *));
static void ggc_mark_tree_ptr PARAMS ((void *));
static void ggc_mark_rtx_varray_ptr PARAMS ((void *));
@ -276,6 +277,43 @@ ggc_mark_roots ()
void
ggc_mark_rtx_children (r)
rtx r;
{
rtx i, last;
/* Special case the instruction chain. This is a data structure whose
chain length is potentially unbounded, and which contain references
within the chain (e.g. label_ref and insn_list). If do nothing here,
we risk blowing the stack recursing through a long chain of insns.
Combat this by marking all of the instructions in the chain before
marking the contents of those instructions. */
switch (GET_CODE (r))
{
case INSN:
case JUMP_INSN:
case CALL_INSN:
case NOTE:
case CODE_LABEL:
case BARRIER:
for (i = NEXT_INSN (r); ; i = NEXT_INSN (i))
if (! ggc_test_and_set_mark (i))
break;
last = i;
for (i = NEXT_INSN (r); i != last; i = NEXT_INSN (i))
ggc_mark_rtx_children_1 (i);
default:
break;
}
ggc_mark_rtx_children_1 (r);
}
static void
ggc_mark_rtx_children_1 (r)
rtx r;
{
const char *fmt;
int i;