[Patch, fortran] Bug 68241 - [meta-bug] Deferred-length character - PRs50221, 68216 and 67674

[Dominique d'Humières]

    do i = 1, size(strings, 1)
      print *, "'",strings(i),"'"
    end do

gives

 'A   '
 'C   '
 'ABCD'
 'V   ‘

print *, (strings(i), i= 1, size(strings, 1))

gives

"A   C   ABCDV   "   (double quotes added)

Both outputs seem correct, but

print *, strings

gives

" A   CDV ? »

and

print '(a)', strings

gives

A   
CDV 
?

i.e., four lines, the three last ones being wrong.

Dominique

> Le 13 nov. 2015 à 15:16, Dominique d'Humières <dominiq@lps.ens.fr> a écrit :
> 
> deferred_character_4_db.f90