flang/test/Lower/OpenMP/Todo/affinity-clause.f90

   1 !RUN: %not_todo_cmd bbc -emit-hlfir -fopenmp -fopenmp-version=50 -o - %s 2>&1 | FileCheck %s
   2 !RUN: %not_todo_cmd %flang_fc1 -emit-hlfir -fopenmp -fopenmp-version=50 -o - %s 2>&1 | FileCheck %s
   3
   4 !CHECK: not yet implemented: Unhandled clause AFFINITY in TASK construct
   5 subroutine f00(x)
   6   integer :: x(10)
   7 !$omp task affinity(x)
   8   x = x + 1
   9 !$omp end task
  10 end