[Bug libfortran/31532] INQUIRE(...,POSITION=...) not standard conforming

[jvdelisle at gcc dot gnu dot org]

------- Comment #6 from jvdelisle at gcc dot gnu dot org  2007-04-28 03:03 -------
Subject: Bug 31532

Author: jvdelisle
Date: Sat Apr 28 03:03:21 2007
New Revision: 124252

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=124252
Log:
2007-04-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR libfortran/31532
        * io/file_pos.c (st_backspace): Set flags.position for end of file
        condition and use new function update_position.
        (st_endfile): Use new function update_position.
        * io/io.h: Add prototype for new function.
        * io/inquire.c (inquire_via_unit): If not direct access, set NEXTREC
        to zero.
        * io/unit.c (update_position): New function to update position info
        used by inquire.
        * io/transfer.c (next_record): Fix typo and use new function.

Modified:
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/file_pos.c
    trunk/libgfortran/io/inquire.c
    trunk/libgfortran/io/io.h
    trunk/libgfortran/io/transfer.c
    trunk/libgfortran/io/unit.c


-- 


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