$ cat inquire_2.f90 
      INTEGER UNIT
      OPEN(FILE='CSEQ', UNIT=23)
      INQUIRE(FILE='CSEQ',NUMBER=UNIT)
      IF (UNIT.NE.23) CALL ABORT
      END
$ gfc inquire_2.f90 && ./a.exe
Abort

-- 
           Summary: inquire via filename fails on mingw32
           Product: gcc
           Version: 4.1.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: fxcoudert at gcc dot gnu dot org
                CC: gcc-bugs at gcc dot gnu dot org
GCC target triplet: i386-mingw32


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

Reply via email to