]> git.ipfire.org Git - thirdparty/gcc.git/commit
Catch division by zero errors in array sizes.
authorThomas Koenig <tkoenig@gcc.gnu.org>
Mon, 30 Dec 2019 13:10:37 +0000 (13:10 +0000)
committerThomas Koenig <tkoenig@gcc.gnu.org>
Mon, 30 Dec 2019 13:10:37 +0000 (13:10 +0000)
commit2f25907603e2a26ba3e5d76880d31ce25d1f0ae7
tree15fd5fb956c615d0c52696ed30c98c96855060ca
parent2885d75b3283e6a8b96421f31b635b55e8cf4fbb
Catch division by zero errors in array sizes.

2019-12-30  Thomas Koenig  <tkoenig@gcc.gnu.org>

Backport from trunk
PR fortran/92961
* gfortran.h (gfc_seen_div0): Add declaration.
* arith.h (gfc_seen_div0): Add definition.
(eval_intrinsic): For integer division by zero, set gfc_seen_div0.
* decl.c (variable_decl):  If resolution resp. simplification
fails for array spec and a division of zero error has been
seen, return MATCH_ERROR.

2019-12-30  Thomas Koenig  <tkoenig@gcc.gnu.org>

Backport from trunk
PR fortran/92961
* gfortran.dg/arith_divide_2.f90: New test.

From-SVN: r279767
gcc/fortran/arith.c
gcc/fortran/decl.c
gcc/fortran/gfortran.h
gcc/testsuite/gfortran.dg/arith_divide_2.f90 [new file with mode: 0644]