]> git.ipfire.org Git - thirdparty/gcc.git/commit
Allow opening file on multiple units
authorjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 15 May 2019 18:02:36 +0000 (18:02 +0000)
committerjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 15 May 2019 18:02:36 +0000 (18:02 +0000)
commita4805c61214b8ec867ddee15dfe073511da34ef1
treed8d96f02445161f81d85ccf4298ddc0a5f9fa39e
parentc4a7002161d1cd666e6797697698694e7361b3ce
Allow opening file on multiple units

As of Fortran 2018 it's allowed to open the same file on multiple
units.

libgfortran/ChangeLog:

2019-05-15  Janne Blomqvist  <jb@gcc.gnu.org>

PR fortran/90461
        * io/open.c (new_unit): Don't check if the file is already open
for F2018.

testsuite/ChangeLog:

2019-05-15  Janne Blomqvist  <jb@gcc.gnu.org>

PR fortran/90461
        * gfortran.dg/open_errors_2.f90: Add -std=f2008, adjust line number.
* gfortran.dg/open_errors_3.f90: New test.

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