[Bug fortran/31618] [4.2, 4.1 only] backspace intrinsic is not working on an unformatted file

[tkoenig at gcc dot gnu dot org]

------- Comment #10 from tkoenig at gcc dot gnu dot org  2007-05-20 22:09 -------
Subject: Bug 31618

Author: tkoenig
Date: Sun May 20 21:07:14 2007
New Revision: 124878

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=124878
Log:
2007-05-20  Thomas Koenig  <tkoenig@gcc.gnu.org>

        PR fortran/31618
        Backport from trunk.
        * io/transfer.c (read_block_direct):  Instead of calling us_read,
        set dtp->u.p.current_unit->current_record = 0 so that pre_position
        will read the record marker.
        (data_transfer_init):  For different error conditions, call
        generate_error, then return.

2007-05-20  Thomas Koenig  <tkoenig@gcc.gnu.org>

        PR fortran/31618
        Backport from trunk.
        * gfortran.dg/backspace_8.f:  New test case.


Added:
    branches/gcc-4_2-branch/gcc/testsuite/gfortran.dg/backspace_8.f
Modified:
    branches/gcc-4_2-branch/gcc/testsuite/ChangeLog
    branches/gcc-4_2-branch/libgfortran/ChangeLog
    branches/gcc-4_2-branch/libgfortran/io/transfer.c


-- 


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