]> git.ipfire.org Git - thirdparty/gcc.git/commit - libgfortran/ChangeLog
PR 53796 Make inquire(file=, recl=) conform to F2018
authorjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 7 Aug 2019 07:34:10 +0000 (07:34 +0000)
committerjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 7 Aug 2019 07:34:10 +0000 (07:34 +0000)
commit4ad9380bafd772cea54392c7189cab07a2121fc9
tree0786cca348054ae6d664c4a2f3245e43e0f3a07d
parent75145cfedb9e3aab5ca8f9c53a61a27b8286fd2a
PR 53796 Make inquire(file=, recl=) conform to F2018

In my original patch to fix PR 53796 I forgot to fix the behavior for
unconnected units when inquiring via filename. This patch fixes that.

Regtested on x86_64-pc-linux-gnu, committed as obvious.

libgfortran/ChangeLog:

2019-08-07  Janne Blomqvist  <jb@gcc.gnu.org>

PR fortran/53796
* io/inquire.c (inquire_via_filename): Set recl to -1 for
unconnected units.

gcc/testsuite/ChangeLog:

2019-08-07  Janne Blomqvist  <jb@gcc.gnu.org>

PR fortran/53796
* gfortran.dg/inquire_recl_f2018.f90: Test for unconnected unit
with inquire via filename.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@274160 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/inquire_recl_f2018.f90
libgfortran/ChangeLog
libgfortran/io/inquire.c