inquire.c (inquire_via_unit): do not allow a direct access file to be opened for...
authorBud Davis <bdavis9659@comcast.net>
Thu, 2 Dec 2004 04:13:21 +0000 (04:13 +0000)
committerBud Davis <bdavis@gcc.gnu.org>
Thu, 2 Dec 2004 04:13:21 +0000 (04:13 +0000)
commit8dc4d66aa7ec5bfe543ac3842ea9d4b3d535b3dc
tree306dab8076c065a717c4dae252792365f72e726b
parentdf65f0938c4b76b388958c04666e0efd279ba333
inquire.c (inquire_via_unit): do not allow a direct access file to be opened for sequential I/O.

2004-12-02  Bud Davis  <bdavis9659@comcast.net>

        * io/inquire.c (inquire_via_unit): do not allow a direct access
        file to be opened for sequential I/O.

        * gfortran.dg/inquire.f90: New test.

From-SVN: r91610
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/inquire.f90 [new file with mode: 0644]
libgfortran/ChangeLog
libgfortran/io/inquire.c