[Bug fortran/52393] New: Erroneous parse of read statement with parenthesised expression in format

[ian_harvey at bigpond dot com]

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

             Bug #: 52393
           Summary: Erroneous parse of read statement with parenthesised
                    expression in format
    Classification: Unclassified
           Product: gcc
           Version: 4.7.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: ian_harvey@bigpond.com


With gfortran built from recent trunk revision 184585 on fedora 15 x86_64, the
following example:

PROGRAM ReadMeTwo
  IMPLICIT NONE
  CHARACTER(10) :: var
  READ ('(') // 'A)', var  
  PRINT *, var
END PROGRAM ReadMeTwo

gives:

$ gfortran -Wall -std=f2003 ReadMeTwo.f90
ReadMeTwo.f90:4.12:

  READ ('(') // 'A)', var
            1
Error: Expected variable in READ statement at (1)

I think the example is valid fortran and should compile without error.