OSDN Git Service

PR libfortran/20163
authorfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 29 Mar 2005 08:37:32 +0000 (08:37 +0000)
committerfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 29 Mar 2005 08:37:32 +0000 (08:37 +0000)
commitcb09492adbe1e4187a6b9f80afdb8bc9637543b1
treefc392638f57c476781c2ab631e8a4d1b41398da1
parent9c9b332fb841e607ed4eec768e2de678538f9d59
PR libfortran/20163
* io/open.c (st_open): call library_end() before returning even if
an error arises.

* gfortran.dg/pr20163-2.f: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@97153 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/pr20163-2.f [new file with mode: 0644]
libgfortran/ChangeLog
libgfortran/io/open.c