--- Comment #7 from dfranke at gcc dot gnu dot org 2009-12-10 19:57 ---
Subject: Bug 34402
Author: dfranke
Date: Thu Dec 10 19:57:16 2009
New Revision: 155138
URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=155138
Log:
gcc/fortran/:
2009-12-10 Daniel Franke
--- Comment #8 from dfranke at gcc dot gnu dot org 2009-12-10 19:59 ---
Fixed in trunk. Closing.
--
dfranke at gcc dot gnu dot org changed:
What|Removed |Added
--- Comment #6 from dfranke at gcc dot gnu dot org 2009-12-09 22:05 ---
(In reply to comment #5)
See 7.1.7(3) in F2003 (and 7.1.12(3) in the F2008 draft.)
Walter, thanks for reference!
--
dfranke at gcc dot gnu dot org changed:
What|Removed
--- Comment #2 from dfranke at gcc dot gnu dot org 2009-12-08 20:33 ---
(In reply to comment #0)
! The following is illegal!
type (bad_t) :: bad = bad_t ( (/ 1., 3., 5., 7., 9. /) )
I don't get it. Fortran 95/2003 explained by Metcalf has exactly this in the
example (figure 12.3,
--- Comment #3 from w6ws at earthlink dot net 2009-12-08 21:34 ---
(In reply to comment #2)
I don't get it. Fortran 95/2003 explained by Metcalf has exactly this in the
example (figure 12.3, p243) for allocatable components... So, where's the
actual problem?
The example on p243
--- Comment #4 from dfranke at gcc dot gnu dot org 2009-12-08 21:41 ---
(In reply to comment #3)
(In reply to comment #2)
I don't get it. Fortran 95/2003 explained by Metcalf has exactly this in
the
example (figure 12.3, p243) for allocatable components... So, where's the
--- Comment #5 from w6ws at earthlink dot net 2009-12-09 00:27 ---
(In reply to comment #4)
... it dawns on me that the crucial point is, that variables with
initializer get the SAVE attribute which doesn't go well with the ALLOCATABLE
components. Correct?
I am not sure why they put
--- Comment #1 from burnus at gcc dot gnu dot org 2007-12-09 13:07 ---
NAG f95:
Error: adf.f90, line 10: Initialisation expression for BAD is not constant
ifort:
fortcom: Error: adf.f90, line 10: A data initialization-expr is not valid for
this object. [BAD]
type (bad_t) :: bad =
