[Bug fortran/33189] New: read(blah, fmt=*) is accepted, but read(blah, '*') not.

[toon at moene dot indiv dot nluug dot nl]

The following, IMNSHO, is valid Fortran 95:

      CHARACTER*10 a
      a = '15'
      READ(a, '*') i
      PRINT*,i
      END

Unfortunately, it draws:

ugh.f:3.72:

      READ(a, '*') i                                                    
                                                                       1
Error: Missing leading left parenthesis in format string at (1)

If I change '*' to fmt=* the code is accepted.


-- 
           Summary: read(blah, fmt=*) is accepted, but read(blah, '*') not.
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: toon at moene dot indiv dot nluug dot nl


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