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

fixed implicit none

Browse Source
This commit is contained in:
ALEXks
2024-07-31 17:01:21 +03:00
parent aa56d986a9
commit 861ce8262e
2 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
sapfor/experts/Sapfor_2017/_src/Transformations/set_implicit_none.cpp
View File

@@ -365,10 +365,13 @@ void implicitCheck(SgFile* file, vector<int>& dvmDirErrorsLines)
vector<SgStatement*> modulesAndFunctions; vector<SgStatement*> modulesAndFunctions;
getModulesAndFunctions(file, modulesAndFunctions); getModulesAndFunctions(file, modulesAndFunctions);
const string currFile = file->filename();
for (int func = 0; func < modulesAndFunctions.size(); ++func) for (int func = 0; func < modulesAndFunctions.size(); ++func)
{ {
SgStatement* function = modulesAndFunctions[func]; SgStatement* function = modulesAndFunctions[func];
if (function->fileName() != currFile)
continue;
typesByFunctions[function] = FunctionImplicitCheck(function, typesByFunctions, dvmDirErrorsLines); typesByFunctions[function] = FunctionImplicitCheck(function, typesByFunctions, dvmDirErrorsLines);
} }

2
sapfor/experts/Sapfor_2017/_src/Utils/version.h
View File

@@ -1,3 +1,3 @@
#pragma once #pragma once
#define VERSION_SPF "2358" #define VERSION_SPF "2359"