[flang-commits] [flang] [flang][OpenACC] Release declare-create allocatable on deallocate (PR #220541)

[Slava Zakharin via flang-commits]

================
@@ -5251,8 +5251,10 @@ void Fortran::lower::declareExternalAccModuleDeclareActionRecipes(
   declareExternalRecipe(declarePostAllocSuffix);
   if (ultimate.test(Flag::AccCreate) || ultimate.test(Flag::AccCopyIn) ||
       ultimate.test(Flag::AccCopyInReadOnly) || ultimate.test(Flag::AccCopy) ||
-      ultimate.test(Flag::AccCopyOut) || ultimate.test(Flag::AccDeviceResident))
-    declareExternalRecipe(declarePostDeallocSuffix);
+      ultimate.test(Flag::AccCopyOut) ||
+      ultimate.test(Flag::AccDeviceResident)) {
+    declareExternalRecipe(declarePreDeallocSuffix);
+  }
----------------
vzakhari wrote:

```suggestion
      ultimate.test(Flag::AccDeviceResident))
    declareExternalRecipe(declarePreDeallocSuffix);
```

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