diff options
| author | Harald Anlauf <anlauf@gmx.de> | 2022-09-20 22:23:43 +0200 |
|---|---|---|
| committer | Harald Anlauf <anlauf@gmx.de> | 2022-09-20 22:23:43 +0200 |
| commit | 8dbb15bc2d019488240c1e69d93121b0347ac092 (patch) | |
| tree | 94a99d153924b03df72ee6d2b49fab04a508d7ad /gcc/testsuite | |
| parent | c77f556741ded4aa868f851ea32f9732602b0ea9 (diff) | |
| download | gcc-8dbb15bc2d019488240c1e69d93121b0347ac092.zip gcc-8dbb15bc2d019488240c1e69d93121b0347ac092.tar.gz gcc-8dbb15bc2d019488240c1e69d93121b0347ac092.tar.bz2 | |
Fortran: NULL pointer dereference in invalid simplification [PR106985]
gcc/fortran/ChangeLog:
PR fortran/106985
* expr.cc (gfc_simplify_expr): Avoid NULL pointer dereference.
gcc/testsuite/ChangeLog:
PR fortran/106985
* gfortran.dg/pr106985.f90: New test.
Diffstat (limited to 'gcc/testsuite')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/pr106985.f90 | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/pr106985.f90 b/gcc/testsuite/gfortran.dg/pr106985.f90 new file mode 100644 index 0000000..f4ed925 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/pr106985.f90 @@ -0,0 +1,8 @@ +! { dg-do compile } +! PR fortran/106985 - ICE in gfc_simplify_expr +! Contributed by G.Steinmetz + +program p + integer, parameter :: a(2) = 1 + integer, parameter :: b = a(2) + b ! { dg-error "before its definition is complete" } +end |