PR fortran/95104 - Segfault on a legal WAIT statement
authorHarald Anlauf <anlauf@gmx.de>
Tue, 26 May 2020 21:29:52 +0000 (23:29 +0200)
committerHarald Anlauf <anlauf@gmx.de>
Tue, 26 May 2020 21:29:52 +0000 (23:29 +0200)
commit56f03cd12be26828788a27f6f3c250041a958e45
tree5f19b44371d196d19da53912ad5c3c79832cbdcc
parent3bf5e7657b752cc2352778e8c20ac9cdddca4f93
PR fortran/95104 - Segfault on a legal WAIT statement

Referencing a unit in a WAIT statement that has not been opened before
resulted in a NULL pointer dereference.  Check for this condition.

2020-05-26  Harald Anlauf  <anlauf@gmx.de>

libgfortran/
PR libfortran/95104
* io/transfer.c (st_wait_async): Do not dereference NULL pointer.

gcc/testsuite/
PR libfortran/95104
* gfortran.dg/pr95104.f90: New test.

Co-Authored-By: Steven G. Kargl <kargl@gcc.gnu.org>
gcc/testsuite/gfortran.dg/pr95104.f90 [new file with mode: 0644]
libgfortran/io/transfer.c