1/* { dg-additional-options "-fdump-tree-original" } */
2
3void
4f (char *cp)
5{
6#pragma acc parallel present(cp[7:9])
7  ;
8}
9
10/* { dg-final { scan-tree-dump-times "#pragma acc parallel map\\(force_present:\\*\\(cp \\+ 7\\) \\\[len: 9]\\) map\\(alloc:cp \\\[pointer assign, bias: 7]\\)" 1 "original" } } */
11/* { dg-final { cleanup-tree-dump "original" } } */
12