Allow opening file on multiple units
authorJanne Blomqvist <jb@gcc.gnu.org>
Wed, 15 May 2019 18:02:36 +0000 (21:02 +0300)
committerJanne Blomqvist <jb@gcc.gnu.org>
Wed, 15 May 2019 18:02:36 +0000 (21:02 +0300)
commit0c15ebf1bd0d7ec8111acfecf71542acac4115b1
treed8d96f02445161f81d85ccf4298ddc0a5f9fa39e
parent40c81f845c6f1c5e6df74442ca59279090ac1e8d
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.

From-SVN: r271260
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