OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

utils.c (end_subprog_body): Push GC context around rest_of_compilation for nested functions.

Browse Source 
* utils.c (end_subprog_body): Push GC context around
        rest_of_compilation for nested functions.

From-SVN: r48294
This commit is contained in:
Richard Henderson 2001-12-23 17:47:10 -08:00 committed by Richard Henderson
parent b6e220169c
commit 72ac12bf6f
2 changed files with 16 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ada/ChangeLog
View File

@ -1,3 +1,8 @@
2001-12-23 Richard Henderson <rth@redhat.com>
* utils.c (end_subprog_body): Push GC context around
rest_of_compilation for nested functions.
2001-12-23 Richard Henderson <rth@redhat.com>
* 5nosinte.ads: Get definition of "int" from Interfaces.C.

12
gcc/ada/utils.c
View File

@ -6,7 +6,7 @@
* *
* C Implementation File *
* *
* $Revision: 1.6 $
* $Revision: 1.7 $
* *
* Copyright (C) 1992-2001, Free Software Foundation, Inc. *
* *
@ -1844,8 +1844,18 @@ end_subprog_body ()
DECL_CONTEXT (DECL_RESULT (current_function_decl)) = current_function_decl;
expand_function_end (input_filename, lineno, 0);
/* If this is a nested function, push a new GC context. That will keep
local variables on the stack from being collected while we're doing
the compilation of this function. */
if (function_nesting_depth > 1)
ggc_push_context ();
rest_of_compilation (current_function_decl);
if (function_nesting_depth > 1)
ggc_pop_context ();
#if 0
/* If we're sure this function is defined in this file then mark it
as such */