(j3.2006) (SC22WG5.5505) Assignment to ero-sized strings and arrays

[Van Snyder]

This seems to need an interp.

On Tue, 2015-05-26 at 15:27 -0700, Walt Brainerd wrote:
> I am willing to try this one more time.
> 
> 
> Tell me I am crazy, stupid, or whatever; it has happened before.
> 
> 
> But to ignore this puzzles me. Is anybody going to correct this error?
> 
> 
> 7.2.1.3(1) of the F08 standard says:
> 
> 
> No value is assigned to the variable if it is of type character and
> zero
> length, or is an array of size zero.
> 
> 
> It is still in N2014, if that is the latest.
> 
> 
> Consider the program:
> 
> 
> program f
> character(len=:), allocatable :: c
> c = ""
> print *, len(c), "X"//C//"X"
> c = "QQQ"
> print *, len(c), "X"//C//"X"
> end program f
> 
> 
> The sentence quoted says that the second assignment does not
> assign the value QQQ because the length of c is zero. I don't
> think that is what is intended.
> 
> 
> Just delete the sentence' it was silly, but wasn't wrong in F95.
> 
> 
> -- 
> Walt Brainerd
> _______________________________________________
> J3 mailing list
> J3 at mailman.j3-fortran.org
> http://mailman.j3-fortran.org/mailman/listinfo/j3