From 5b4071b23785bffa77b1a047e7f14e0fe1e69d37 Mon Sep 17 00:00:00 2001 From: ALEXks Date: Tue, 7 Nov 2023 14:54:54 +0300 Subject: [PATCH] fixed omp direcitves processing --- .../_src/DirectiveProcessing/directive_parser.cpp | 11 +++++++---- sapfor/experts/Sapfor_2017/_src/Utils/version.h | 2 +- 2 files changed, 8 insertions(+), 5 deletions(-) diff --git a/sapfor/experts/Sapfor_2017/_src/DirectiveProcessing/directive_parser.cpp b/sapfor/experts/Sapfor_2017/_src/DirectiveProcessing/directive_parser.cpp index 8666e7b..74b4c29 100644 --- a/sapfor/experts/Sapfor_2017/_src/DirectiveProcessing/directive_parser.cpp +++ b/sapfor/experts/Sapfor_2017/_src/DirectiveProcessing/directive_parser.cpp @@ -643,17 +643,20 @@ vector parseOmpDirs(void* stIn, const set &globalPriv, bool forD SgStatement* st = (SgStatement*)stIn; vector resultAll; - char* lineS = st->comments(); + const char* lineS = st->comments(); if (!lineS) return resultAll; - vector split; - splitString(lineS, '\n', split); + string comment(lineS); + convertToLower(comment); + + vector 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) diff --git a/sapfor/experts/Sapfor_2017/_src/Utils/version.h b/sapfor/experts/Sapfor_2017/_src/Utils/version.h index c029d8b..7002f57 100644 --- a/sapfor/experts/Sapfor_2017/_src/Utils/version.h +++ b/sapfor/experts/Sapfor_2017/_src/Utils/version.h @@ -1,3 +1,3 @@ #pragma once -#define VERSION_SPF "2235" +#define VERSION_SPF "2236"