Lines Matching defs:prog_unit
5250 gfc_namespace *prog_unit = gfc_current_ns;
5251 while (prog_unit->parent)
5256 prog_unit = prog_unit->parent;
5260 if (prog_unit->omp_target_seen
5262 && !(prog_unit->omp_requires & clause))
5276 && (prog_unit->omp_requires & OMP_REQ_ATOMIC_MEM_ORDER_MASK)
5277 && (prog_unit->omp_requires & OMP_REQ_ATOMIC_MEM_ORDER_MASK)
5281 if (prog_unit->omp_requires & OMP_REQ_ATOMIC_MEM_ORDER_SEQ_CST)
5283 else if (prog_unit->omp_requires & OMP_REQ_ATOMIC_MEM_ORDER_ACQ_REL)
5285 else if (prog_unit->omp_requires & OMP_REQ_ATOMIC_MEM_ORDER_RELAXED)
5304 if (prog_unit != gfc_current_ns && !(prog_unit->omp_requires & clause))
5320 prog_unit->omp_requires |= clause;
5846 gfc_namespace *prog_unit = gfc_current_ns;
5847 while (prog_unit->parent)
5848 prog_unit = prog_unit->parent;
5849 switch (prog_unit->omp_requires & OMP_REQ_ATOMIC_MEM_ORDER_MASK)
Indexes created Thu Apr 09 00:23:28 UTC 2026