From owner-sc22wg5+sc22wg5-dom8=www.open-std.org@open-std.org  Wed Dec 23 22:45:40 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 B87213587FE; Wed, 23 Dec 2015 22:45:40 +0100 (CET)
Delivered-To: sc22wg5@open-std.org
Received: from esa2.cray.iphmx.com (esa2.cray.iphmx.com [68.232.143.164])
	(using TLSv1 with cipher RC4-SHA (128/128 bits))
	(No client certificate requested)
	by www.open-std.org (Postfix) with ESMTP id 9F15C3571BD
	for <sc22wg5@open-std.org>; Wed, 23 Dec 2015 22:45:35 +0100 (CET)
DomainKey-Signature: s=cray1024; d=cray.com; c=nofws; q=dns;
  h=X-IronPort-AV:X-Cray-OBMMKR:Received:Received:Received:
   From:To:Subject:Thread-Topic:Thread-Index:Date:Message-ID:
   Accept-Language:Content-Language:X-MS-Has-Attach:
   X-MS-TNEF-Correlator:x-originating-ip:Content-Type:
   Content-ID:Content-Transfer-Encoding:MIME-Version:
   Return-Path;
  b=T/aKF35k5L7W/FduoZN0/PYXiNUX2oKAWBiLa5krJMPyfDu1Xtm0I3wl
   vZQ7l4tN+tm5I/Oiv6mEFKAzn2xwFzAWU7aeq4GxX5UXcnCu+oKHY3CMj
   1nt9BndXNLat8TI8HDHV87iEdfH5H6Yb0tM3iDrd7H4U60GfGZiAu8WTG
   4=;
DKIM-Signature: v=1; a=rsa-sha256; c=simple/simple;
  d=cray.com; i=@cray.com; q=dns/txt; s=cray1024;
  t=1450907140; x=1482443140;
  h=from:to:subject:date:message-id:content-id:
   content-transfer-encoding:mime-version;
  bh=9qSo9f15GqPN7K+jcVGbd2dF8V236guUvgrld4VKrfU=;
  b=hynlQk2DtFzRzPtQdDnTNyLntYh8BV+jt6Xs1+QOYbzGxLjFPO7TIhL8
   pIvtVzjd3Ts00oHjLAShZVKdPiUe7Gq2sDqK6EOfZXT83TOl+tU0yAGFN
   /GyOJEq3+GydprkbHW407ebbNIgHIcArzDLJjWOkzvlWasx3aPKYg7XT/
   8=;
X-IronPort-AV: E=Sophos;i="5.20,470,1444690800"; 
   d="scan'208";a="5441811"
X-Cray-OBMMKR: 1433258124 5441811
Received: from cray-smtp-2.cray.com (HELO CFWEX01.americas.cray.com) ([136.162.34.11])
  by esa2.cray.iphmx.com with ESMTP/TLS/AES256-SHA; 23 Dec 2015 21:45:34 +0000
Received: from CFWEX02.americas.cray.com (172.30.74.25) by
 CFWEX01.americas.cray.com (172.30.88.25) with Microsoft SMTP Server (TLS) id
 14.3.224.2; Wed, 23 Dec 2015 15:45:33 -0600
Received: from CFWEX01.americas.cray.com ([169.254.1.15]) by
 cfwex02.americas.cray.com ([169.254.2.187]) with mapi id 14.03.0224.002; Wed,
 23 Dec 2015 15:45:32 -0600
From: Bill Long <longb@cray.com>
To: WG5 <sc22wg5@open-std.org>
Subject: Interpretations straw ballot 11
Thread-Topic: Interpretations straw ballot 11
Thread-Index: AQHRPcs+gjQfWhyuhUOHAB8SGXBdaw==
Date: Wed, 23 Dec 2015 21:45:31 +0000
Message-ID: <7FD34AFC-093F-45BE-97C6-9CBD22308DD6@cray.com>
Accept-Language: en-US
Content-Language: en-US
X-MS-Has-Attach:
X-MS-TNEF-Correlator:
x-originating-ip: [172.31.22.59]
Content-Type: text/plain; charset="us-ascii"
Content-ID: <108937E329519E4EB312085B40CF9D88@cray.com>
Content-Transfer-Encoding: quoted-printable
MIME-Version: 1.0
Sender: owner-sc22wg5@open-std.org
Precedence: bulk

WG5 straw ballot 11 and J3 letter ballot 35 on Fortran 2008 interpretations
                      John Reid, 19 December 2015


The following Fortran 2008 interpretations are being balloted:

Yes  No   Number     Title		=20
-Y-  --- F08/0128 Is recursive USE within a submodule permitted?
-C-  --- F08/0138 Type extension in submodules
-C-  --- F08/0139 Is the name of an external procedure that has a
                  binding label a local identifier?
-C-  --- F08/0140 Assign to deferred-length coindexed character variable
-C-  --- F08/0141 Can a statement function have a variable-length PDT
                  result?
-Y-  --- F08/0142 Is useless module extension permitted?
-C-  --- F08/0143 May a pure procedure have an INTENT(OUT) polymorphic
                  component?
-C-  --- F08/0144 Is nonadvancing I/O allowed during execution of DO
                  CONCURRENT?
					=20

Comment for F08/0138:
---------------------

In the Question, replace "C456 in 007r1 reads" by "C465 in 10-007r1
reads".=20

{Fix typo in the constraint number, and be more precise about the
document number - there have been lots of 007r1's.}


Comment for F08/0139:
---------------------

In the Question, replace "Consider the program fragment" by "Consider
the program fragment containing the external subprograms".

{Clarify that these subprograms could not be internal or module
subprograms, with wording suggested by Malcolm Cohen. Alternatively,
include a complete program as the example, such as:


 Subroutine s() Bind(C,Name=3D'Hello')
     Print *,'Hello'
 End Subroutine
 Subroutine s() Bind(C,Name=3D'World')
   Print *,'World'
 End Subroutine

 subroutine sub_hello ()
   interface
     Subroutine s() Bind(C,Name=3D'Hello')
     End Subroutine
   end interface

   call s()
 end subroutine sub_hello

 subroutine sub_world ()
   interface
     Subroutine s() Bind(C,Name=3D'World')
     End Subroutine
   end interface

   call s()
 end subroutine sub_world

program test
  call sub_hello()
  call sub_world()
end program test

}


Comment for F08/0140:
---------------------

At the end of Q2, add a line

"Is the assignment permitted?"

{Since Q2 is not currently an actual "question", the answer is a bit
vague about what is "intended to be permitted".}


Comment for F08/0141:
---------------------

The first Edit should be at [24:11+] (and not at [22:11+]).

{And hence in the stated subclause. I assume previous changes have
removed or modified the last sentence of the previous paragraph in
10-007r1 "Any standard-conforming Fortran 2003 ... 1539".}


Comment for F08/0143:
---------------------

In the example code of the Question change=20

  Type(t),Intent(Out) x

to

  Type(t),Intent(Out) :: x

{Syntax rule R501. Agreeing with the comment of Erik Kruyt.}


Comment for F08/0144:
---------------------

In program P for Q1, replace=20

      write ( *, *, advance=3D'NO' ) I

by

      write ( *, '(I5)', advance=3D'NO' ) I


{Constraint C922 requires an "explicit format
specification". Recommending the alternate version suggested by Erik
Kruyt.}


Cheers,
Bill


Bill Long                                                                  =
     longb@cray.com
Fortran Technical Support  &                                  voice:  651-6=
05-9024
Bioinformatics Software Development                     fax:  651-605-9142
Cray Inc./ Cray Plaza, Suite 210/ 380 Jackson St./ St. Paul, MN 55101


