diff options
| author | Tobias Burnus <burnus@net-b.de> | 2016-06-21 20:36:25 +0200 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2016-06-21 20:36:25 +0200 |
| commit | 63617e30150f174ffa325057327c16483715aa09 (patch) | |
| tree | bef2b4d9e20275608c09b5f7e99543e05aa99067 /gcc/testsuite | |
| parent | 2befd3f722b21e47f238c61400955eb9e65ce782 (diff) | |
| download | gcc-63617e30150f174ffa325057327c16483715aa09.zip gcc-63617e30150f174ffa325057327c16483715aa09.tar.gz gcc-63617e30150f174ffa325057327c16483715aa09.tar.bz2 | |
re PR fortran/71068 (ICE in check_data_variable(): Bad expression)
2016-06-20 Tobias Burnus <burnus@net-b.de>
PR fortran/71068
* resolve.c (resolve_function): Don't resolve caf_get/caf_send.
(check_data_variable): Strip-off caf_get before checking.
PR fortran/71068
* gfortran.dg/coarray/data_1.f90: New.
From-SVN: r237656
Diffstat (limited to 'gcc/testsuite')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/coarray/data_1.f90 | 11 |
2 files changed, 16 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index ffb1614..7f57209 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2016-06-21 Tobias Burnus <burnus@net-b.de> + + PR fortran/71068 + * gfortran.dg/coarray/data_1.f90: New. + 2016-06-21 Wilco Dijkstra <wdijkstr@arm.com> * gcc.target/aarch64/advsimd-intrinsics/vrnd.c diff --git a/gcc/testsuite/gfortran.dg/coarray/data_1.f90 b/gcc/testsuite/gfortran.dg/coarray/data_1.f90 new file mode 100644 index 0000000..d68ac14 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/coarray/data_1.f90 @@ -0,0 +1,11 @@ +! { dg-do compile } +! +! PR fortran/71068 +! +! Contributed by Gerhard Steinmetz +! +program p + integer :: a(2)[*] + data a(1)[1] /1/ ! { dg-error "cannot have a coindex" } + data a(2)[1] /2/ ! { dg-error "cannot have a coindex" } +end |