diff options
| author | jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-02-17 23:21:23 +0000 |
|---|---|---|
| committer | jakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-02-17 23:21:23 +0000 |
| commit | b6eab06c8e37527ee7083204e2f4e6747a80c8de (patch) | |
| tree | 99d57e94e1f1d6770502eaeebe10cc9b46a906ae /gcc/testsuite/gfortran.dg/pr36922.f | |
| parent | 4f0507c2d96ea6b5e445ea402f5aa21ebd89804f (diff) | |
| download | gcc-b6eab06c8e37527ee7083204e2f4e6747a80c8de.tar.gz | |
PR tree-optimization/36922
* tree-data-ref.c (initialize_matrix_A): Handle BIT_NOT_EXPR.
* tree-scalar-evolution.c (interpret_rhs_expr, instantiate_scev_1):
Likewise.
* gfortran.dg/pr36922.f: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@144250 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/gfortran.dg/pr36922.f')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/pr36922.f | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/pr36922.f b/gcc/testsuite/gfortran.dg/pr36922.f new file mode 100644 index 00000000000..6aa95beb696 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/pr36922.f @@ -0,0 +1,16 @@ +C PR tree-optimization/36922 +C { dg-do compile } +C { dg-options "-O2 -ftree-loop-linear" } + SUBROUTINE PR36922(N,F,Z,C) + IMPLICIT DOUBLE PRECISION(A-H,O-Z) + DIMENSION C(23821),Z(0:2*N+1),F(0:2*N) + I=0 + DO L=0,N + DO M=0,L + DO M2=M,L + I=I+1 + C(I)=F(L+M)*F(L-M)*Z(L-M2)/(F(M2+M)*F(M2-M)*F(L-M2)*F(L-M2)) + ENDDO + ENDDO + ENDDO + END |