[Bug fortran/36824] gfortran does not recognize constant array bounds in dimension attribute of type component

[burnus at gcc dot gnu dot org]

--- Comment #5 from burnus at gcc dot gnu dot org  2008-07-18 13:18 ---
Subject: Bug 36824

Author: burnus
Date: Fri Jul 18 13:17:49 2008
New Revision: 137949

URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=137949
Log:
The new file gfortran.dg/array_4.f90 was missing from the commit 137910

2008-07-17  Tobias Burnus  [EMAIL PROTECTED]
PR fortran/36824
* gfortran.dg/array_4.f90: New.

Added:
trunk/gcc/testsuite/gfortran.dg/array_4.f90


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36824

[Bug fortran/36824] gfortran does not recognize constant array bounds in dimension attribute of type component

[burnus at gcc dot gnu dot org]

--- Comment #3 from burnus at gcc dot gnu dot org  2008-07-17 09:45 ---
Subject: Bug 36824

Author: burnus
Date: Thu Jul 17 09:44:33 2008
New Revision: 137917

URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=137917
Log:
2008-07-17  Tobias Burnus  [EMAIL PROTECTED]

PR fortran/36824
* resolve.c (resolve_fl_derived): Fix constentness check
for the array dimensions.

2008-07-17  Tobias Burnus  [EMAIL PROTECTED]

PR fortran/36824
* gfortran.dg/array_4.f90: New.


Added:
branches/gcc-4_3-branch/gcc/testsuite/gfortran.dg/array_4.f90
Modified:
branches/gcc-4_3-branch/gcc/fortran/ChangeLog
branches/gcc-4_3-branch/gcc/fortran/resolve.c
branches/gcc-4_3-branch/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36824

[Bug fortran/36824] gfortran does not recognize constant array bounds in dimension attribute of type component

[burnus at gcc dot gnu dot org]

--- Comment #4 from burnus at gcc dot gnu dot org  2008-07-17 09:46 ---
FIXED on the trunk (4.4) and for 4.3 (i.e. for 4.3.2).

Thanks for the bugreport.


-- 

burnus at gcc dot gnu dot org changed:

   What|Removed |Added

 Status|UNCONFIRMED |RESOLVED
 Resolution||FIXED


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36824

[Bug fortran/36824] gfortran does not recognize constant array bounds in dimension attribute of type component

[burnus at gcc dot gnu dot org]

--- Comment #2 from burnus at gcc dot gnu dot org  2008-07-17 05:55 ---
Subject: Bug 36824

Author: burnus
Date: Thu Jul 17 05:54:42 2008
New Revision: 137910

URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=137910
Log:
2008-07-17  Tobias Burnus  [EMAIL PROTECTED]

PR fortran/36825
PR fortran/36824
* array.c (gfc_match_array_spec): Fix array-rank check.
* resolve.c (resolve_fl_derived): Fix constentness check
for the array dimensions.

2008-07-17  Tobias Burnus  [EMAIL PROTECTED]

PR fortran/36825
PR fortran/36824
* gfortran.dg/rank_2.f90: Add additional array-rank test.
* gfortran.dg/array_4.f90: New.


Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/array.c
trunk/gcc/fortran/resolve.c
trunk/gcc/testsuite/ChangeLog
trunk/gcc/testsuite/gfortran.dg/rank_2.f90


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36824

[Bug fortran/36824] gfortran does not recognize constant array bounds in dimension attribute of type component

[burnus at gcc dot gnu dot org]

--- Comment #1 from burnus at gcc dot gnu dot org  2008-07-14 19:30 ---
The following seems to fix it.

Index: resolve.c
===
--- resolve.c   (Revision 137789)
+++ resolve.c   (Arbeitskopie)
@@ -7682,8 +7805,8 @@ resolve_fl_derived (gfc_symbol *sym)
   for (i = 0; i  c-as-rank; i++)
{
  if (c-as-lower[i] == NULL
- || !gfc_is_constant_expr (c-as-lower[i])
  || (resolve_index_expr (c-as-lower[i]) == FAILURE)
+ || !gfc_is_constant_expr (c-as-lower[i])
  || c-as-upper[i] == NULL
  || (resolve_index_expr (c-as-upper[i]) == FAILURE)
  || !gfc_is_constant_expr (c-as-upper[i]))


-- 

burnus at gcc dot gnu dot org changed:

   What|Removed |Added

   Keywords||rejects-valid


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36824