fixed omp direcitves processing

This commit is contained in:
ALEXks
2023-11-07 14:54:54 +03:00
parent 5b2cae9070
commit 5b4071b237
2 changed files with 8 additions and 5 deletions

View File

@@ -643,17 +643,20 @@ vector<OmpDir> parseOmpDirs(void* stIn, const set<string> &globalPriv, bool forD
SgStatement* st = (SgStatement*)stIn;
vector<OmpDir> resultAll;
char* lineS = st->comments();
const char* lineS = st->comments();
if (!lineS)
return resultAll;
string comment(lineS);
convertToLower(comment);
vector<string> split;
splitString(lineS, '\n', split);
splitString(comment, '\n', split);
for (int z = split.size() - 1; z >= 0; z--)
{
string line = split[z];
convertToLower(line);
if (line.substr(0, 6) == "!$omp&")
{
if (z - 1 < 0)

View File

@@ -1,3 +1,3 @@
#pragma once
#define VERSION_SPF "2235"
#define VERSION_SPF "2236"