diff options
author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2019-11-30 15:02:50 +0000 |
---|---|---|
committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2019-11-30 15:02:50 +0000 |
commit | f9235a2bafb1ea078367b1b804fd73d5d849fcdc (patch) | |
tree | 5a8a2ef77b4d2cdf21897ad1f1f8a2a41b5e931a /gcc/testsuite | |
parent | 7a4f45d7e61e651330931df9d09fe6299874929d (diff) | |
download | gcc-f9235a2bafb1ea078367b1b804fd73d5d849fcdc.zip gcc-f9235a2bafb1ea078367b1b804fd73d5d849fcdc.tar.gz gcc-f9235a2bafb1ea078367b1b804fd73d5d849fcdc.tar.bz2 |
Do not look at _data component in gfc_dep_resolver.
2019-11-30 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/91783
* dependency.c (gfc_dep_resolver): Do not look at _data
component if present.
2019-11-30 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/91783
* gfortran.dg/dependency_56.f90: New test.
From-SVN: r278873
Diffstat (limited to 'gcc/testsuite')
-rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/dependency_56.f90 | 14 |
2 files changed, 19 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index ad1be1d..650866f 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2019-11-30 Thomas Koenig <tkoenig@gcc.gnu.org> + + PR fortran/91783 + * gfortran.dg/dependency_56.f90: New test. + 2019-11-29 Richard Biener <rguenther@suse.de> PR tree-optimization/91003 diff --git a/gcc/testsuite/gfortran.dg/dependency_56.f90 b/gcc/testsuite/gfortran.dg/dependency_56.f90 new file mode 100644 index 0000000..97c0c81 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/dependency_56.f90 @@ -0,0 +1,14 @@ +! { dg-do compile } +! PR 91783 - used to cause an ICE in dependency checking. +! Test case by Gerhard Steinmetz. +program p + class(*), allocatable :: a(:) + a = [1, 2, 3] + a = f(a) +contains + function f(x) result(y) + class(*), allocatable, intent(in) :: x(:) + class(*), allocatable :: y(:) + y = x + end +end |