http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56422
Bug #: 56422
Summary: IR F08/0086: gfortran rejects valid implied-shape
arrays
Classification: Unclassified
Product: gcc
Version: 4.8.0
Status: UNCONFIRMED
Keywords: rejects-valid
Severity: normal
Priority: P3
Component: fortran
AssignedTo: [email protected]
ReportedBy: [email protected]
IR F08/0086, http://www.j3-fortran.org/doc/year/13/13-235r1.txt allows the
following, which is currently rejected by:
Error: Assumed size array at (1) must be a dummy argument
Note: The IR has not yet passed the J3/WG5 vote and has thus to be taken with a
pinch of salt.
Q1. Consider
Program test1
Character(*) a,b(*)
Dimension c(*)
Parameter (a='123', b=['1','2','3'])
Character(*),Parameter :: c = [ '44','55','66' ]
Print *,a,b,c
End
[...]
Q2. Consider
Subroutine test2(a)
Real,Dimension(*) :: a,c
Parameter (c = [ 45.6 ])
a(b) = c
End Subroutine
[...]
ANSWER:
A1. Yes, the program was intended to conform to the Fortran standard.
An edit is provided to modify the requirement for prior
specification so as to allow this case.
A2. Yes, the program is intended to conform to the Fortran standard.
An edit is provided to add syntax to permit this unambiguously.
[...]
