1 ! { dg-require-effective-target tls }
2 module omp_threadprivate1
4 end module omp_threadprivate1
7 !$omp threadprivate (/T/) ! { dg-error "not found" }
11 !$omp threadprivate (/S/)
14 !$omp parallel copyin (/T/) ! { dg-error "not found" }
15 !$omp end parallel ! { dg-error "" }