diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2025-04-12 19:51:23 -0700 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2025-04-13 08:39:32 -0700 |
| commit | ee6173800ed1f9b653a85019ad2fa8e6d883823a (patch) | |
| tree | d55f9b7e457d6e53f449cace2f336f870734b1dc /gcc/testsuite/g++.dg/pr107985.C | |
| parent | 5869a881442aa4214d5deed7cfe0d352bcca1fd4 (diff) | |
| download | gcc-master.zip gcc-master.tar.gz gcc-master.tar.bz2 | |
When closing a UNIT with an invalid negative unit
number, a segfault ensued. This patch adds checks
for these conditions and issues errors.
PR libfortran/119502
libgfortran/ChangeLog:
* io/close.c (st_close): Issue an error and avoid
calling close_share when there is no stream assigned.
* io/open.c (st_open): If there is no stream assigned
to the unit, unlock the unit and issue an error.
gcc/testsuite/ChangeLog:
* gfortran.dg/pr119502.f90: New test.
Diffstat (limited to 'gcc/testsuite/g++.dg/pr107985.C')
0 files changed, 0 insertions, 0 deletions