1 ! { dg-additional-options "-fdump-tree-original" }
3 ! { dg-final { scan-tree-dump-times "#pragma omp teams thread_limit\\(9\\)" 1 "original" } }
4 ! { dg-final { scan-tree-dump-times "#pragma omp target thread_limit\\(9\\)" 1 "original" } }
6 ! { dg-final { scan-tree-dump-times "#pragma omp target nowait thread_limit\\(4\\)" 1 "original" } }
7 ! { dg-final { scan-tree-dump-times "#pragma omp parallel num_threads\\(1\\)" 1 "original" } }
9 ! { dg-final { scan-tree-dump-times "#pragma omp target thread_limit\\(6\\)" 1 "original" } }
18 !$omp target teams thread_limit (9)
19 !$omp end target teams
24 !$omp target parallel nowait thread_limit (4) num_threads (1)
25 if (omp_get_thread_limit () > 4) &
27 !$omp end target parallel
36 !$omp target thread_limit (6)
37 if (omp_get_thread_limit () > 6) &