mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-02-06 14:40:31 +08:00
Code Issues Packages Projects Releases Wiki Activity

re PR fortran/24440 (gfortran failed to build 187.facerec)

Browse Source 
2005-10-19  Paul Thomas  <pault@gcc.gnu.org>

	PR fortran/24440
	* resolve.c (resolve_symbol): Correct error in check for
	assumed size array with default initializer by testing
	for arrayspec before dereferencing it.

From-SVN: r105596
This commit is contained in:
Paul Thomas 2005-10-19 05:33:32 +00:00
parent b3e2e29c19
commit 78c5725962
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gcc/fortran/ChangeLog
View File

@ -1,3 +1,10 @@
2005-10-19 Paul Thomas <pault@gcc.gnu.org>
PR fortran/24440
* resolve.c (resolve_symbol): Correct error in check for
assumed size array with default initializer by testing
for arrayspec before dereferencing it.
2005-10-17 Paul Thomas <pault@gcc.gnu.org>
PR fortran/23446

1
gcc/fortran/resolve.c
View File

@ -4319,6 +4319,7 @@ resolve_symbol (gfc_symbol * sym)
if (sym->ts.type == BT_DERIVED
&& sym->attr.dummy
&& sym->attr.intent == INTENT_OUT
&& sym->as
&& sym->as->type == AS_ASSUMED_SIZE)
{
for (c = sym->ts.derived->components; c; c = c->next)