http://gcc.gnu.org/bugzilla/show_bug.cgi?id=57538
Bug ID: 57538
Summary: SAVE attribute needed for derived type with default
initialization?
Product: gcc
Version: 4.8.1
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: valeryweber at hotmail dot com
Dear,
I would like to ask you if the following code is f2008ts valid.
So does the declaration of the table(...) need the SAVE?
Thanks
Valery
MODULE periodic_table
IMPLICIT NONE
TYPE, PUBLIC :: atom_type
INTEGER :: number = 0
END TYPE atom_type
INTEGER, PARAMETER, PRIVATE :: n_elements = 118
TYPE( atom_type ), PUBLIC :: table( 0:n_elements )
END MODULE periodic_table
