1subroutine foo 2 integer i, j, k 3 !$omp parallel 4 !$omp do lastprivate (conditional: i) ! { dg-warning "conditional 'lastprivate' on loop iterator 'i' ignored" } 5 do i = 1, 32 6 end do 7 !$omp do collapse (3) lastprivate (conditional: i) ! { dg-warning "conditional 'lastprivate' on loop iterator 'i' ignored" } 8 do i = 1, 32 9 do j = 1, 32 10 do k = 1, 32 11 end do 12 end do 13 end do 14 !$omp do collapse (3) lastprivate (conditional: j) ! { dg-warning "conditional 'lastprivate' on loop iterator 'j' ignored" } 15 do i = 1, 32 16 do j = 1, 32 17 do k = 1, 32 18 end do 19 end do 20 end do 21 !$omp do collapse (3) lastprivate (conditional: k) ! { dg-warning "conditional 'lastprivate' on loop iterator 'k' ignored" } 22 do i = 1, 32 23 do j = 1, 32 24 do k = 1, 32 25 end do 26 end do 27 end do 28 !$omp end parallel 29 30 !$omp parallel do lastprivate (conditional: i) ! { dg-warning "conditional 'lastprivate' on loop iterator 'i' ignored" } 31 do i = 1, 32 32 end do 33 !$omp end parallel do 34 35 !$omp parallel do collapse (3) lastprivate (conditional: i) ! { dg-warning "conditional 'lastprivate' on loop iterator 'i' ignored" } 36 do i = 1, 32 37 do j = 1, 32 38 do k = 1, 32 39 end do 40 end do 41 end do 42 !$omp end parallel do 43 44 !$omp parallel do collapse (3) lastprivate (conditional: j) ! { dg-warning "conditional 'lastprivate' on loop iterator 'j' ignored" } 45 do i = 1, 32 46 do j = 1, 32 47 do k = 1, 32 48 end do 49 end do 50 end do 51 !$omp end parallel do 52 53 !$omp parallel do collapse (3) lastprivate (conditional: k) ! { dg-warning "conditional 'lastprivate' on loop iterator 'k' ignored" } 54 do i = 1, 32 55 do j = 1, 32 56 do k = 1, 32 57 end do 58 end do 59 end do 60 !$omp end parallel do 61end subroutine 62