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

re PR fortran/26409 (ICE on Assumed shape nested subroutine)

Browse Source 
2006-02-24  Paul Thomas  <pault@gcc.gnu.org>

	PR fortran/26409
	* resolve.c (resolve_contained_functions, resolve_types,
	gfc_resolve): Revert patch of 2006-02-19.

From-SVN: r111417
This commit is contained in:
Paul Thomas 2006-02-24 13:54:06 +00:00
parent 8a0b57b3c7
commit 0f3162e391
2 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -1,3 +1,9 @@
2006-02-24 Paul Thomas <pault@gcc.gnu.org>
PR fortran/26409
* resolve.c (resolve_contained_functions, resolve_types,
gfc_resolve): Revert patch of 2006-02-19.
2006-02-24 Paul Thomas <pault@gcc.gnu.org>
PR fortran/24519

7
gcc/fortran/resolve.c
View File

@ -542,8 +542,6 @@ resolve_contained_functions (gfc_namespace * ns)
gfc_namespace *child;
gfc_entry_list *el;
resolve_entries (ns);
resolve_formal_arglists (ns);
for (child = ns->contained; child; child = child->sibling)
@ -6090,6 +6088,10 @@ resolve_types (gfc_namespace * ns)
gfc_current_ns = ns;
resolve_entries (ns);
resolve_contained_functions (ns);
gfc_traverse_ns (ns, resolve_symbol);
resolve_fntype (ns);
@ -6160,7 +6162,6 @@ gfc_resolve (gfc_namespace * ns)
old_ns = gfc_current_ns;
resolve_contained_functions (ns);
resolve_types (ns);
resolve_codes (ns);