1! { dg-additional-options "-O2" }
2! { dg-additional-options "-fdump-tree-ealias-all" }
3
4program main
5  implicit none
6  integer, parameter :: n = 2
7  integer, target, dimension (0:n-1) :: a
8  integer, pointer :: ptr(:)
9  ptr => a
10
11  !$acc kernels pcopyin (a, ptr(0:2))
12  a(0) = 0
13  ptr(0) = 1
14  !$acc end kernels
15
16end program main
17
18! Only the omp_data_i related loads should be annotated with cliques.
19! { dg-final { scan-tree-dump-times "clique 1 base 1" 4 "ealias" } }
20! { dg-final { scan-tree-dump-times "(?n)clique 1 base 0" 5 "ealias" } }
21