This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug fortran/88052] New: Format contravening f2008 constraint C1002 permitted


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.

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]