[Bug fortran/84412] [7/8 Regression] Erroneous "Inquire statement identifies an internal file" error

[jvdelisle at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84412

--- Comment #4 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Author: jvdelisle
Date: Sun Feb 18 16:30:42 2018
New Revision: 257793

URL: https://gcc.gnu.org/viewcvs?rev=257793&root=gcc&view=rev
Log:
2018-02-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        Backport from trunk
        PR libgfortran/84412
        * io/transfer.c (finalize_transfer): After completng an internal unit
        I/O operation, clear internal_unit_kind.

        * gfortran.dg/inquire_18.f90: New test.

Added:
    branches/gcc-7-branch/gcc/testsuite/gfortran.dg/inquire_18.f90
Modified:
    branches/gcc-7-branch/gcc/testsuite/ChangeLog
    branches/gcc-7-branch/libgfortran/ChangeLog
    branches/gcc-7-branch/libgfortran/io/transfer.c