17 lines · plain
1!RUN: %flang_fc1 -emit-hlfir -fopenmp -fopenmp-version=52 %s -o - | FileCheck %s2 3module m4!$omp requires atomic_default_mem_order(release)5 6contains7 8subroutine f00(x, v)9 integer :: x, v10!CHECK: omp.atomic.read {{[ %#=0-9]+}} memory_order(relaxed)11 !$omp atomic read12 v = x13end14 15end module16 17