[flang-commits] [flang] [flang][cuda] Allow SHARED actual to DEVICE dummy (PR #115215)

[Valentin Clement バレンタイン クレメン via flang-commits]

================
@@ -134,8 +135,12 @@ bool AreCompatibleCUDADataAttrs(std::optional<CUDADataAttr> x,
     } else {
       if (*x == CUDADataAttr::Device) {
         if ((y &&
-                (*y == CUDADataAttr::Managed || *y == CUDADataAttr::Unified)) ||
+                (*y == CUDADataAttr::Managed || *y == CUDADataAttr::Unified ||
+                    *y == CUDADataAttr::Shared)) ||
             (!y && (isCudaUnified || isCudaManaged))) {
+          if (y && *y == CUDADataAttr::Shared) {
+            *warning = "SHARED attribute ignored"s;
----------------
clementval wrote:

Done. 

https://github.com/llvm/llvm-project/pull/115215