1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
implicit none
integer :: a
!$omp target map(close, delete: a) ! { dg-error "TARGET with map-type other than TO, FROM, TOFROM, or ALLOC on MAP clause at \\(1\\)" }
!$omp end target
!$omp target map(close) ! { dg-error "Symbol 'close' at \\(1\\) has no IMPLICIT type" }
!$omp end target
!$omp target map(always) ! { dg-error "Symbol 'always' at \\(1\\) has no IMPLICIT type" }
!$omp end target
!$omp target map(always, always, to : a) ! { dg-error "too many 'always' modifiers" }
! !$omp end target
!$omp target map(always always, to : a) ! { dg-error "too many 'always' modifiers" }
! !$omp end target
!$omp target map(always, always to : a) ! { dg-error "too many 'always' modifiers" }
! !$omp end target
!$omp target map(always always to : a) ! { dg-error "too many 'always' modifiers" }
! !$omp end target
!$omp target map(close, close, to : a) ! { dg-error "too many 'close' modifiers" }
! !$omp end target
!$omp target map(close close, to : a) ! { dg-error "too many 'close' modifiers" }
! !$omp end target
!$omp target map(close, close to : a) ! { dg-error "too many 'close' modifiers" }
! !$omp end target
!$omp target map(close close to : a) ! { dg-error "too many 'close' modifiers" }
! !$omp end target
!$omp target map(present present, to : a) ! { dg-error "too many 'present' modifiers" }
! !$omp end target
!$omp target map(present, present to : a) ! { dg-error "too many 'present' modifiers" }
! !$omp end target
!$omp target map(present present to : a) ! { dg-error "too many 'present' modifiers" }
! !$omp end target
!$omp target map(close close always always to : a) ! { dg-error "too many 'always' modifiers" }
! !$omp end target
!$omp target map(present close always present to : a) ! { dg-error "too many 'present' modifiers" }
! !$omp end target
end
|
