[Bug fortran/35009] New: error on valid with -std=f95 (character arrays in format tags)

["bcbarnes at gmail dot com" <gcc-bugzilla at gcc dot gnu dot org>]

from my original report:

I have a program which uses conditional format tags, similar to this testcase
which is taken from page 187 of Metcalf, Reid and Cohen's Fortran 95/2003
explained:

---
      program testcase
      integer :: ival(30),key,i
      character(30) :: buffer
      character(6) :: form2(3) = (/ '(30i1)', '(15i2)', '(10i3)' /)

      read (*, '(a30,i1)') buffer, key
      read (buffer, form2 (key)) (ival(i), i=1,30/key)

      end
---

When compiled with -std=gnu  (gfortran 4.2.2, darwin8), no warning is issued
(which is good).  But when compiled with -std=f95 or -std=f2003, the following
error results:

---
nell:~/work/bit barnes$ gfortran -std=f95 testcase.f
testcase.f:7.19:

      read (buffer, form2 (key)) (ival(i), i=1,30/key)
                  1
Error: Extension: Character array in FORMAT tag at (1)
---


Tobias S. confirmed this as a bug.  I was using gfortran 4.2.2 but this is
probably in 4.3.0 as well.


-- 
           Summary: error on valid with -std=f95 (character arrays in format
                    tags)
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: bcbarnes at gmail dot com


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35009