OSDN Git Service

PR libfortran/35293
authorhp <hp@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 5 Mar 2008 01:50:33 +0000 (01:50 +0000)
committerhp <hp@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 5 Mar 2008 01:50:33 +0000 (01:50 +0000)
commita93b7f1cd56c45ce2261a8637c7f57f10005b2ba
tree80aeb189f4a89b4797ea2eb3dd5f0f5781ac9461
parentad7c187a05b297ab8236a752d5331ca138976a94
PR libfortran/35293
* io/unix.c (fd_truncate): Fold s->special_file case into
success case of ftruncate/chsize call instead of the failure case.
Make failure case actually return failure.  Properly update stream
pointers on failure.  Call runtime_error for targets without
neither ftruncate nor chsize where such a call would be needed.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@132888 138bc75d-0d04-0410-961f-82ee72b054a4
libgfortran/ChangeLog
libgfortran/io/unix.c