Skip to content
Snippets Groups Projects
Commit 82498ed4 authored by François-Xavier Coudert's avatar François-Xavier Coudert
Browse files

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: r97153
parent 3445a80c
No related branches found
No related tags found
Hide whitespace changes
Inline Side-by-side
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