Alexander_KS/SAPFOR
4
2
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

replace_dist_arrays_in_io: choose arrays for copying more carefully

Browse Source
This commit is contained in:
Mikhail Kocharmin
2024-11-16 10:30:59 +03:00
parent c63c4dd46c
commit d9d4d50e5a
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
sapfor/experts/Sapfor_2017/_src/Transformations/replace_dist_arrays_in_io.cpp
View File

@@ -19,7 +19,7 @@ static void findArrays(SgExpression* exp, set<SgSymbol*>& arrays)
{ {
if (exp) if (exp)
{ {
if (isSgArrayRefExp(exp)) if (isArrayRef(exp))
arrays.insert(exp->symbol()); arrays.insert(exp->symbol());
findArrays(exp->lhs(), arrays); findArrays(exp->lhs(), arrays);
@@ -53,7 +53,7 @@ static void populateDistributedIoArrays(map<DIST::Array*, set<SgStatement*>>& ar
if (!arg) if (!arg)
return; return;
if (arg->variant() != ARRAY_REF) if (!isArrayRef(arg))
return; return;
if (arg->lhs()) if (arg->lhs())
@@ -122,7 +122,7 @@ static void populateDistributedIoArrays(map<DIST::Array*, set<SgStatement*>>& ar
{ {
string array_name = string(by_symb->identifier()); string array_name = string(by_symb->identifier());
DIST::Array* array_p = getArrayFromDeclarated(declaratedInStmt(by_symb), array_name); DIST::Array* array_p = getArrayFromDeclarated(declaratedInStmt(by_symb), array_name);
if (array_p && array_p->GetDistributeFlagVal() == Distribution::distFlag::DISTR && arrays[array_p].insert(stat).second) if (array_p && array_p->GetDistributeFlagVal() == Distribution::distFlag::IO_PRIV && arrays[array_p].insert(stat).second)
__spf_print(DEBUG_TRACE, "[%d]: add array %s\n", stat->lineNumber(), array_p->GetName().c_str()); __spf_print(DEBUG_TRACE, "[%d]: add array %s\n", stat->lineNumber(), array_p->GetName().c_str());
} }