Lines Matching defs:nt
28 ! CHECK-SAME: %[[COND_REF:.*]]: !fir.ref<!fir.logical<4>> {fir.bindc_name = "cond"}, %[[NT_REF:.*]]: !fir.ref<i32> {fir.bindc_name = "nt"}
29 subroutine parallel_do_with_parallel_clauses(cond, nt)
33 integer :: nt
44 !$OMP PARALLEL DO IF(cond) NUM_THREADS(nt) PROC_BIND(close)
57 ! CHECK-SAME: %[[NT_REF:.*]]: !fir.ref<i32> {fir.bindc_name = "nt"}
58 subroutine parallel_do_with_clauses(nt)
60 integer :: nt
69 !$OMP PARALLEL DO NUM_THREADS(nt) SCHEDULE(dynamic)
87 ! CHECK-SAME: %[[COND_REF:.*]]: !fir.ref<!fir.logical<4>> {fir.bindc_name = "cond"}, %[[NT_REF:.*]]: !fir.ref<i32> {fir.bindc_name = "nt"}
88 subroutine parallel_do_with_privatisation_clauses(cond,nt)
92 integer :: nt
97 ! CHECK: %[[PRIVATE_NT_REF:.*]] = fir.alloca i32 {bindc_name = "nt", pinned, uniq_name = "_QFparallel_do_with_privatisation_clausesEnt"}
106 !$OMP PARALLEL DO PRIVATE(cond) FIRSTPRIVATE(nt)
116 print*, i, cond, nt
129 subroutine parallel_private_do(cond,nt)
131 integer :: nt
133 !$OMP PARALLEL PRIVATE(cond) FIRSTPRIVATE(nt)
136 call foo(i, cond, nt)
144 ! CHECK-SAME: %[[VAL_1:.*]]: !fir.ref<i32> {fir.bindc_name = "nt"}) {
222 subroutine parallel_do_private(cond,nt)
224 integer :: nt
227 !$OMP DO PRIVATE(cond) FIRSTPRIVATE(nt)
229 call foo(i, cond, nt)
237 ! CHECK-SAME: %[[VAL_1:.*]]: !fir.ref<i32> {fir.bindc_name = "nt"}) {
244 ! CHECK: %[[NT_PRIV_ADDR:.*]] = fir.alloca i32 {bindc_name = "nt", pinned, uniq_name = "_QFparallel_do_privateEnt"}