This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/88052] New: Format contravening f2008 constraint C1002 permitted
- From: "john.harper at vuw dot ac.nz" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Thu, 15 Nov 2018 23:08:29 +0000
- Subject: [Bug fortran/88052] New: Format contravening f2008 constraint C1002 permitted
- Auto-submitted: auto-generated
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=88052
Bug ID: 88052
Summary: Format contravening f2008 constraint C1002 permitted
Product: gcc
Version: 7.2.1
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: john.harper at vuw dot ac.nz
Target Milestone: ---
In the following program, F2008 constraint C1002 requires a comma between A and
F edit descriptors in a format, but the program without it compiled and ran as
if the comma was there.
cayley[~/ANZIAM] % cat badfmt.f90
! F2008 constraint C1002 requires comma between A and F in a format
program badfmt
implicit none
character(40):: fmt = "(AF9.6)"
print *,fmt
print fmt, 'pi =',4*atan(1.0)
end program badfmt
cayley[~/ANZIAM] % gfortran badfmt.f90; ./a.out
(AF9.6)
pi = 3.141593
cayley[~/ANZIAM] %
If the second print statement is changed to
print "(AF9.6)",'pi =',4*atan(1.0)
then the error is correctly diagnosed.