[flang][openacc] Add proper TODO for the block construct

Trigger the not yet implemented message for block constructs that are not lowered. Reviewed By: PeteSteinfeld, razvanlupusoru Differential Revision: https://reviews.llvm.org/D148253
llvm · Apr 13, 2023 · bc7c9be · bc7c9be
1 parent 6251b04
commit bc7c9be
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/flang/lib/Lower/OpenACC.cpp b/flang/lib/Lower/OpenACC.cpp
@@ -701,6 +701,12 @@ genACC(Fortran::lower::AbstractConverter &converter,
   } else if (blockDirective.v == llvm::acc::ACCD_data) {
     genACCDataOp(converter, currentLocation, semanticsContext, stmtCtx,
                  accClauseList);
+  } else if (blockDirective.v == llvm::acc::ACCD_serial) {
+    TODO(currentLocation, "serial construct lowering");
+  } else if (blockDirective.v == llvm::acc::ACCD_kernels) {
+    TODO(currentLocation, "kernels construct lowering");
+  } else if (blockDirective.v == llvm::acc::ACCD_host_data) {
+    TODO(currentLocation, "host_data construct lowering");
   }
 }