Commit 64f33597 by David Edelsohn Committed by David Edelsohn

read_eof.f90: Open scratch file, not /dev/null.

        * gfortran.fortran-torture/execute/read_eof.f90: Open scratch
        file, not /dev/null.  Abort on error.

From-SVN: r92737
parent d49b398c
2004-12-30 David Edelsohn <edelsohn@gnu.org>
* gfortran.fortran-torture/execute/read_eof.f90: Open scratch
file, not /dev/null. Abort on error.
2004-12-30 Alexander Malmberg <alexander@malmberg.org> 2004-12-30 Alexander Malmberg <alexander@malmberg.org>
Ziemowit Laski <zlaski@apple.com> Ziemowit Laski <zlaski@apple.com>
......
! PR 13919, segfault when file is empty ! PR 13919, segfault when file is empty
open(unit=8,file='/dev/null') open(unit=8,status='scratch')
read(8,*,end=1)i read(8,*,end=1)i
call abort
1 continue 1 continue
end end
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment