re PR libfortran/20163 ([4.0 only] gfortran - error opening direct access file)

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.

From-SVN: r97152
This commit is contained in:
Dale Ranta 2005-03-29 08:33:49 +00:00 committed by François-Xavier Coudert
parent 6e858d450b
commit 3445a80c36

View File

@ -1,3 +1,9 @@
2005-03-29 Dale Ranta <dir@lanl.gov>
Francois-Xavier Coudert <coudert@clipper.ens.fr>
PR libfortran/20163
* gfortran.dg/pr20163-2.f: New test.
2005-03-28 Steve Ellcey <sje@cup.hp.com>
PR target/19890