diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/dependency_29.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/dependency_29.f90 | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/dependency_29.f90 b/gcc/testsuite/gfortran.dg/dependency_29.f90 new file mode 100644 index 000000000..398bf2c7b --- /dev/null +++ b/gcc/testsuite/gfortran.dg/dependency_29.f90 @@ -0,0 +1,11 @@ +! { dg-do compile } +! { dg-options "-Warray-temporaries" } + +subroutine t1(n1,n2, gfft, ufft) + implicit none + integer :: n1, n2, i + real :: gfft(n1,n2), ufft(n2) + DO i=1, n1 + gfft(i,:)=gfft(i,:)*ufft(i) + END DO +end subroutine t1 |