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

added new pass for statistics, updated dvm

Browse Source
This commit is contained in:
ALEXks
2024-08-30 12:17:35 +03:00
parent 861ce8262e
commit 7b34de49a8
12 changed files with 114 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
dvm/fdvm/trunk/fdvm/acc_f2c.cpp
View File

@@ -170,7 +170,7 @@ static char* getNestCond()
static char* getNewCycleVar(const char *oldVar)
{
char *str = new char[strlen(oldVar) + 2];
char *str = new char[strlen(oldVar) + 3];
str[0] = '\0';
strcat(str, "__");
strcat(str, oldVar);
@@ -3468,7 +3468,7 @@ SgSymbol *hasSameNameAsSource(SgSymbol *symb)
int sameVariableName(SgSymbol *symb1, SgSymbol *symb2)
{
if (!symb1 || !symb2 || (symb1->variant() != VARIABLE_NAME && symb1->variant() != CONST_NAME) || symb2->variant() != VARIABLE_NAME && symb2->variant() != CONST_NAME)
if (!symb1 || !symb2 || (symb1->variant() != VARIABLE_NAME && symb1->variant() != CONST_NAME && symb1->variant() != FUNCTION_NAME) || symb2->variant() != VARIABLE_NAME && symb2->variant() != CONST_NAME && symb2->variant() != FUNCTION_NAME)
return 0;
if (!strcmp (symb1->identifier(), symb2->identifier()))
return 1;