http://gcc.gnu.org/bugzilla/show_bug.cgi?id=51976
Walter Spector <w6ws at earthlink dot net> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |w6ws at earthlink dot net
--- Comment #12 from Walter Spector <w6ws at earthlink dot net> ---
Adding myself (Walter Spector) to the cc list. My contribution is a simple
little test case that works with current versions of Intel (with -assume
realloc_lhs option) and NAG. As of todays gfortran snapshot (20130828), I get
a lot of 'Deferred-length character component 'city' at (1) is not yet
supported' errors.
program city_names
implicit none
type city_entry_t
character(:), allocatable :: city
character(:), allocatable :: state
end type
type(city_entry_t), allocatable :: cities(:)
integer :: i
cities = (/ &
city_entry_t ("San Francisco", "California"), &
city_entry_t ("Portland", "Oregon"), &
city_entry_t ("Seattle", "Washington"), &
city_entry_t ("Salt Lake City", "Utah"), &
city_entry_t ("Reno", "Nevada"), &
city_entry_t ("Tucson", "Arizona"), &
city_entry_t ("Denver", "Colorado"), &
city_entry_t ("Kansas City","Kansas"), &
city_entry_t ("Tulsa", "Oklahoma"), &
city_entry_t ("Houston", "Texas") &
/)
print '(5a)', (">",cities(i)%city, ", ", cities(i)%state,"<", i=1,size
(cities))
end program
