diff options
author | hjl <hjl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-28 16:51:19 +0000 |
---|---|---|
committer | hjl <hjl@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-28 16:51:19 +0000 |
commit | 608b95762dde4f4e234f2ace7112f18bb9fb69ab (patch) | |
tree | fa5353f83a5a61b82b530a5c8625afb5eda14067 | |
parent | 9db953d7ee1e541a536fd97955c03f3c6c33fa14 (diff) |
2009-07-28 H.J. Lu <hongjiu.lu@intel.com>
Backport from mainline:
2009-07-27 Janus Weil <janus@gcc.gnu.org>
PR fortran/40848
* gfortran.dg/altreturn_7.f90: New.
2009-07-27 Simon Baldwin <simonb@google.com>
PR testsuite/40829
* gcc.dg/vect/no-scevccp-noreassoc-outer-2.c: Extended array 'a'
so that indexing no longer runs off array end.
2009-07-24 Janus Weil <janus@gcc.gnu.org>
PR fortran/40822
* gfortran.dg/char_length_16.f90: New.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/gcc-4_4-branch@150169 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r-- | gcc/testsuite/ChangeLog | 19 | ||||
-rw-r--r-- | gcc/testsuite/gcc.dg/vect/no-scevccp-noreassoc-outer-2.c | 2 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/altreturn_7.f90 | 34 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/char_length_16.f90 | 12 |
4 files changed, 66 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index d97f3774dcb..a44d60fa97c 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,22 @@ +2009-07-28 H.J. Lu <hongjiu.lu@intel.com> + + Backport from mainline: + 2009-07-27 Janus Weil <janus@gcc.gnu.org> + + PR fortran/40848 + * gfortran.dg/altreturn_7.f90: New. + + 2009-07-27 Simon Baldwin <simonb@google.com> + + PR testsuite/40829 + * gcc.dg/vect/no-scevccp-noreassoc-outer-2.c: Extended array 'a' + so that indexing no longer runs off array end. + + 2009-07-24 Janus Weil <janus@gcc.gnu.org> + + PR fortran/40822 + * gfortran.dg/char_length_16.f90: New. + 2009-07-28 Jakub Jelinek <jakub@redhat.com> PR fortran/40878 diff --git a/gcc/testsuite/gcc.dg/vect/no-scevccp-noreassoc-outer-2.c b/gcc/testsuite/gcc.dg/vect/no-scevccp-noreassoc-outer-2.c index 71897ff6a6f..9a4fa3f2538 100644 --- a/gcc/testsuite/gcc.dg/vect/no-scevccp-noreassoc-outer-2.c +++ b/gcc/testsuite/gcc.dg/vect/no-scevccp-noreassoc-outer-2.c @@ -4,7 +4,7 @@ #include "tree-vect.h" #define N 40 -int a[200*N]; +int a[200*N+N]; __attribute__ ((noinline)) void foo (){ diff --git a/gcc/testsuite/gfortran.dg/altreturn_7.f90 b/gcc/testsuite/gfortran.dg/altreturn_7.f90 new file mode 100644 index 00000000000..6eb0c78bde7 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/altreturn_7.f90 @@ -0,0 +1,34 @@ +! { dg-do compile } +! +! PR 40848: [4.5 Regression] ICE with alternate returns +! +! Contributed by Joost VandeVondele <jv244@cam.ac.uk> + +MODULE TT + +INTERFACE M + MODULE PROCEDURE M1,M2 +END INTERFACE + +CONTAINS + + SUBROUTINE M1(I,*) + INTEGER :: I + RETURN 1 + END SUBROUTINE + + SUBROUTINE M2(I,J) + INTEGER :: I,J + END SUBROUTINE + +END MODULE + + + USE TT + CALL M(1,*2) + CALL ABORT() +2 CONTINUE +END + +! { dg-final { cleanup-modules "tt" } } + diff --git a/gcc/testsuite/gfortran.dg/char_length_16.f90 b/gcc/testsuite/gfortran.dg/char_length_16.f90 new file mode 100644 index 00000000000..3ff14d2395b --- /dev/null +++ b/gcc/testsuite/gfortran.dg/char_length_16.f90 @@ -0,0 +1,12 @@ +! { dg-do compile } +! +! PR 40822: [4.5 Regression] Internal compiler error when Fortran intrinsic LEN referenced before explicit declaration +! +! Contributed by Mat Cross <mathewc@nag.co.uk> + +SUBROUTINE SEARCH(ITEMVAL) + CHARACTER (*) :: ITEMVAL + CHARACTER (LEN(ITEMVAL)) :: ITEM + INTRINSIC LEN +END + |