From owner-sc22wg5+sc22wg5-dom8=www.open-std.org@open-std.org  Wed May 27 00:46:50 2015
Return-Path: <owner-sc22wg5+sc22wg5-dom8=www.open-std.org@open-std.org>
X-Original-To: sc22wg5-dom8
Delivered-To: sc22wg5-dom8@www.open-std.org
Received: by www.open-std.org (Postfix, from userid 521)
	id 3F1B635870F; Wed, 27 May 2015 00:46:50 +0200 (CEST)
Delivered-To: sc22wg5@open-std.org
Received: from mail.jpl.nasa.gov (sentrion1.jpl.nasa.gov [128.149.139.105])
	(using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits))
	(No client certificate requested)
	by www.open-std.org (Postfix) with ESMTP id 9113635859B
	for <sc22wg5@open-std.org>; Wed, 27 May 2015 00:46:44 +0200 (CEST)
Received: from [137.79.7.57] (math.jpl.nasa.gov [137.79.7.57])
	by smtp.jpl.nasa.gov (Sentrion-MTA-4.3.1/Sentrion-MTA-4.3.1) with ESMTP id t4QMkeS4000952
	(using TLSv1.2 with cipher DHE-RSA-AES128-GCM-SHA256 (128 bits) verified NO)
	for <sc22wg5@open-std.org>; Tue, 26 May 2015 15:46:41 -0700
Subject: Re: (j3.2006) (SC22WG5.5504) Assignment to ero-sized strings and
 arrays
From: Van Snyder <Van.Snyder@jpl.nasa.gov>
Reply-To: Van.Snyder@jpl.nasa.gov
To: sc22wg5 <sc22wg5@open-std.org>
In-Reply-To: <20150526222707.E035535859B@www.open-std.org>
References: <20150526222707.E035535859B@www.open-std.org>
Content-Type: text/plain; charset="ISO-8859-1"
Organization: Yes
Date: Tue, 26 May 2015 15:46:40 -0700
Message-ID: <1432680400.19025.231.camel@math.jpl.nasa.gov>
Mime-Version: 1.0
X-Mailer: Evolution 2.32.3 (2.32.3-34.el6) 
Content-Transfer-Encoding: 7bit
X-Source-Sender: Van.Snyder@jpl.nasa.gov
X-AUTH: Authorized
Sender: owner-sc22wg5@open-std.org
Precedence: bulk

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@mailman.j3-fortran.org
> http://mailman.j3-fortran.org/mailman/listinfo/j3