Merge pull request 'fix parsing of omp threadprivate dirs' (#13) from fix-omp into master
This commit was merged in pull request #13.
This commit is contained in:
@@ -2609,17 +2609,11 @@ static bool findOmpThreadPrivDecl(SgStatement* st, map<SgStatement*, set<string>
|
|||||||
{
|
{
|
||||||
st = st->lexNext();
|
st = st->lexNext();
|
||||||
|
|
||||||
if (st->variant() == CONTAINS_STMT)
|
|
||||||
break;
|
|
||||||
|
|
||||||
if (isSgExecutableStatement(st))
|
|
||||||
break;
|
|
||||||
|
|
||||||
auto res = parseOmpDirs(st, dummy);
|
auto res = parseOmpDirs(st, dummy);
|
||||||
for (auto& dir : res)
|
for (auto& dir : res)
|
||||||
for (auto& var : dir.threadPrivVars)
|
for (auto& var : dir.threadPrivVars)
|
||||||
it->second.insert(var);
|
it->second.insert(var);
|
||||||
} while (st != lastN);
|
} while (st != lastN && !isSgExecutableStatement(st) && st->variant() != CONTAINS_STMT);
|
||||||
}
|
}
|
||||||
|
|
||||||
if (it->second.find(toFind->identifier()) != it->second.end())
|
if (it->second.find(toFind->identifier()) != it->second.end())
|
||||||
|
|||||||
@@ -1,3 +1,3 @@
|
|||||||
#pragma once
|
#pragma once
|
||||||
|
|
||||||
#define VERSION_SPF "2229"
|
#define VERSION_SPF "2230"
|
||||||
|
|||||||
Reference in New Issue
Block a user