[llvm-branch-commits] [flang] [Flang][OpenMP] Derived type explicit allocatable member mapping (PR #96266)

[via llvm-branch-commits]

================
@@ -953,6 +954,22 @@ bool ClauseProcessor::processMap(
           if (origSymbol && fir::isTypeWithDescriptor(origSymbol.getType()))
             symAddr = origSymbol;
 
+          if (object.sym()->owner().IsDerivedType()) {
+            omp::ObjectList objectList = gatherObjects(object, semaCtx);
+            parentObj = objectList[0];
+            parentMemberIndices.insert({parentObj.value(), {}});
----------------
agozillon wrote:

I believe insert will block subsequent inserts if the key is already registered, so it shouldn't overwrite, but I could be misunderstanding it and I'll double check/verify this again when i get around to updating the PR :-) 

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