diff options
| author | Steven G. Kargl <kargl@gcc.gnu.org> | 2016-12-17 23:10:01 +0000 |
|---|---|---|
| committer | Steven G. Kargl <kargl@gcc.gnu.org> | 2016-12-17 23:10:01 +0000 |
| commit | efa84b0163fae255cc8ca2fe9de3a2c696648bfa (patch) | |
| tree | f3e12f1a5c141d52fde6a63517e01043b0669520 | |
| parent | 8ccaace8355c45a0b4602c2a666d4d5318fdc707 (diff) | |
| download | gcc-efa84b0163fae255cc8ca2fe9de3a2c696648bfa.zip gcc-efa84b0163fae255cc8ca2fe9de3a2c696648bfa.tar.gz gcc-efa84b0163fae255cc8ca2fe9de3a2c696648bfa.tar.bz2 | |
re PR fortran/78746 (charlen_03, charlen_10 ICE)
2016-12-17 Steven G. Kargl <kargl@gcc.gnu.org>
PR fortran/78746
* charlen_03.f90: Remove test.
* charlen_10.f90: Ditto.
From-SVN: r243778
| -rw-r--r-- | gcc/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/charlen_03.f90 | 9 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/charlen_10.f90 | 9 |
3 files changed, 6 insertions, 18 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 8315852..c7bf548 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2016-12-17 Steven G. Kargl <kargl@gcc.gnu.org> + + PR fortran/78746 + * charlen_03.f90: Remove test. + * charlen_10.f90: Ditto. + 2016-12-17 Jakub Jelinek <jakub@redhat.com> PR sanitizer/78832 diff --git a/gcc/testsuite/gfortran.dg/charlen_03.f90 b/gcc/testsuite/gfortran.dg/charlen_03.f90 deleted file mode 100644 index 37f4bd8..0000000 --- a/gcc/testsuite/gfortran.dg/charlen_03.f90 +++ /dev/null @@ -1,9 +0,0 @@ -! { dg-do compile } -! PR fortran/65173 -program p - type t - character(:), allocatable :: x(n) ! { dg-error "must have a deferred shape" } - end type -end -! { dg-excess-errors "must be of INTEGER type" } - diff --git a/gcc/testsuite/gfortran.dg/charlen_10.f90 b/gcc/testsuite/gfortran.dg/charlen_10.f90 deleted file mode 100644 index 2d7ba6c..0000000 --- a/gcc/testsuite/gfortran.dg/charlen_10.f90 +++ /dev/null @@ -1,9 +0,0 @@ -! { dg-do compile } -! PR fortran/65173 -program p - type t - character(:), allocatable :: x(y)1 ! { dg-error "must have a deferred shape" } - end type -end -! { dg-excess-errors "must be of INTEGER type" } - |