[Bug fortran/54679] New: Erroneous "Expected P edit descriptor" in conjunction with L descriptor

[nmm1 at cam dot ac.uk]

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

             Bug #: 54679
           Summary: Erroneous "Expected P edit descriptor" in conjunction
                    with L descriptor
    Classification: Unclassified
           Product: gcc
           Version: 4.6.3
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: nmm1@cam.ac.uk


I get a spurious "Expected P edit descriptor in format string" in
conjunction with the L0 descriptor in a non-trivial format.  Changing
the L0 to I0 or F0.0 works.  It MAY be environment dependent, as I have
also failed to see it in another test program.  The oprogram is not
worth attaching.

PROGRAM Main
    IMPLICIT NONE
    CHARACTER(LEN=*), PARAMETER ::    &
        format1 = "(A,1X,I2,1X,A,1X,I2,1X,A,2(1X,I0,1X),A,2(1X,I0,1X))",    &
        format2 = "(A,1X,I2,1X,A,1X,I2,1X,A,2(1X,I0,1X),A,2(1X,L0,1X))",    &
        format3 = "(A,1X,I2,1X,A,1X,I2,1X,A,2(1X,I0,1X),A,2(1X,F0.0,1X))"
    PRINT format1
    PRINT format2
    PRINT format3
END PROGRAM Main

gives:

junk.f90:8.55:

    PRINT format2
                                                       1
Error: Expected P edit descriptor in format string at (1)