add todo testcases

Author: kparzysz

flang/test/Lower/OpenMP/Todo/map-modifiers-close.f90

@@ -0,0 +1,10 @@
+! RUN: %not_todo_cmd bbc -emit-fir -fopenmp -o - %s 2>&1 | FileCheck %s
+! RUN: %not_todo_cmd %flang_fc1 -emit-fir -fopenmp -o - %s 2>&1 | FileCheck %s
+
+!CHECK: Map type modifiers (other than 'ALWAYS') are not implemented yet
+subroutine f00()
+  integer :: x
+  !$omp target map(close: x)
+  x = x + 1
+  !$omp end target
+end

flang/test/Lower/OpenMP/Todo/map-modifiers-ompxhold.f90

@@ -0,0 +1,11 @@
+! RUN: %not_todo_cmd bbc -emit-fir -fopenmp -o - %s 2>&1 | FileCheck %s
+! RUN: %not_todo_cmd %flang_fc1 -emit-fir -fopenmp -o - %s 2>&1 | FileCheck %s
+
+!CHECK: Map type modifiers (other than 'ALWAYS') are not implemented yet
+subroutine f01()
+  integer :: x
+  !$omp target map(ompx_hold: x)
+  x = x + 1
+  !$omp end target
+end
+

flang/test/Lower/OpenMP/Todo/map-modifiers-present.f90

@@ -0,0 +1,11 @@
+! RUN: %not_todo_cmd bbc -emit-fir -fopenmp -o - %s 2>&1 | FileCheck %s
+! RUN: %not_todo_cmd %flang_fc1 -emit-fir -fopenmp -o - %s 2>&1 | FileCheck %s
+
+!CHECK: Map type modifiers (other than 'ALWAYS') are not implemented yet
+subroutine f02()
+  integer :: x
+  !$omp target map(present: x)
+  x = x + 1
+  !$omp end target
+end
+