re PR libfortran/19314 (inquire(position=) segfaults at runtime)
authorBud Davis <bdavis9659@comcast.net>
Sat, 22 Jan 2005 03:51:12 +0000 (03:51 +0000)
committerBud Davis <bdavis@gcc.gnu.org>
Sat, 22 Jan 2005 03:51:12 +0000 (03:51 +0000)
commitb1a807057ecb701601141285c011ef637b97f3b7
tree2558c3d156cfc7fc1cf142d5f1c70137cabcff5b
parent987732e0c88255f18d408d2ad35eb7bcff865083
re PR libfortran/19314 (inquire(position=) segfaults at runtime)

2004-01-22  Bud Davis  <bdavis9659@comcast.net>

        PR fortran/19314
        * io/inquire.c(inquire_via_unit): implement POSITION=.
        * io/transfer.c(next_record): update position for
        INQUIRE.
        * io/rewind.c(st_rewind): update position for
        INQUIRE.

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

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