https://gcc.gnu.org/bugzilla/show_bug.cgi?id=99711

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |kargl at gcc dot gnu.org

--- Comment #2 from kargl at gcc dot gnu.org ---
(In reply to Jerry DeLisle from comment #1)
> F2018 standard section 13.10.3 List-directed Input
> 
> There is a note NOTE 13.29 at the end of the first sub-section 13.10.3.1"
> 
> "An allocatable, deferred-length character effective item does not have its
> allocation status or allocated length changed as a result of list-directed
> input."
> 
> This implies that if the strings of the array are not already allocated to a
> resonable length, for example a string of blanks, then the read will attempt
> to transfer the file contents into unallocated strings.

Doesn't the line

 allocate( character(len=10) :: cbulist_ru(5) )

that is the first executable statement in the program
allocate an array of 5 strings with length 10?

Reply via email to