Commit 045d5055 by Tom de Vries Committed by Tom de Vries

Add goacc/kernels-alias{,-2}.f95

2016-03-15  Tom de Vries  <tom@codesourcery.com>

	* gfortran.dg/goacc/kernels-alias-2.f95: New test.
	* gfortran.dg/goacc/kernels-alias.f95: New test.

From-SVN: r234214
parent 2aaeea19
2016-03-15 Tom de Vries <tom@codesourcery.com>
* gfortran.dg/goacc/kernels-alias-2.f95: New test.
* gfortran.dg/goacc/kernels-alias.f95: New test.
2016-03-14 Martin Sebor <msebor@redhat.com>
PR c++/53792
......
! { dg-additional-options "-O2" }
! { dg-additional-options "-fdump-tree-ealias-all" }
program main
implicit none
integer, parameter :: n = 2
integer :: a, b, c, d
!$acc kernels copyin (a) create (b) copyout (c) copy (d)
a = 0
b = 0
c = 0
d = 0
!$acc end kernels
end program main
! { dg-final { scan-tree-dump-times "clique 1 base 1" 4 "ealias" } }
! { dg-final { scan-tree-dump-times "clique 1 base 2" 1 "ealias" } }
! { dg-final { scan-tree-dump-times "clique 1 base 3" 1 "ealias" } }
! { dg-final { scan-tree-dump-times "clique 1 base 4" 1 "ealias" } }
! { dg-final { scan-tree-dump-times "clique 1 base 5" 1 "ealias" } }
! { dg-final { scan-tree-dump-times "(?n)clique .* base .*" 8 "ealias" } }
! { dg-additional-options "-O2" }
! { dg-additional-options "-fdump-tree-ealias-all" }
program main
implicit none
integer, parameter :: n = 2
integer, dimension (0:n-1) :: a, b, c, d
!$acc kernels copyin (a) create (b) copyout (c) copy (d)
a(0) = 0
b(0) = 0
c(0) = 0
d(0) = 0
!$acc end kernels
end program main
! { dg-final { scan-tree-dump-times "clique 1 base 1" 4 "ealias" } }
! { dg-final { scan-tree-dump-times "clique 1 base 2" 1 "ealias" } }
! { dg-final { scan-tree-dump-times "clique 1 base 3" 1 "ealias" } }
! { dg-final { scan-tree-dump-times "clique 1 base 4" 1 "ealias" } }
! { dg-final { scan-tree-dump-times "clique 1 base 5" 1 "ealias" } }
! { dg-final { scan-tree-dump-times "(?n)clique .* base .*" 8 "ealias" } }
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment