From 7b5873af9ed5d7a6bcf3812fc96ebe8232cd0519 Mon Sep 17 00:00:00 2001
From: xnpster <xnpster@yandex.ru>
Date: Wed, 10 Sep 2025 22:23:43 +0300
Subject: [PATCH] ArrayAnalysis: consider case of IO_PRIV array from module

---
 src/Distribution/ArrayAnalysis.cpp | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/Distribution/ArrayAnalysis.cpp b/src/Distribution/ArrayAnalysis.cpp
index 57ac0d9..98286cd 100644
--- a/src/Distribution/ArrayAnalysis.cpp
+++ b/src/Distribution/ArrayAnalysis.cpp
@@ -270,6 +270,12 @@ static void findArrayRefs (SgExpression* ex, SgStatement* st, string fName, int
                         fillPrivatesFromComment(new Statement(prev), privatesS);
                         if (privatesS.find(symb->identifier()) != privatesS.end())
                             itNew->second.first->SetDistributeFlag(DIST::SPF_PRIV);
+
+                        if (!(itNew->second.first->IsNotDistribute()) &&
+                            deprecatedByIO.find(symb->identifier()) != deprecatedByIO.end())
+                        {
+                            itNew->second.first->SetDistributeFlag(DIST::IO_PRIV);
+                        }
                     }
                     else
                         itNew->second.first->SetDistributeFlag(DIST::SPF_PRIV);