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

fixed parser

Browse Source
This commit is contained in:
ALEXks
2023-10-11 20:12:31 +03:00
parent 8d6661fa9d
commit 963acc8982
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
dvm/fdvm/trunk/parser/lexfdvm.c
View File

@@ -1168,7 +1168,7 @@ top:
break; break;
else else
*p = c; *p = c;
if ((prefix[1]=='$') && (prefix[2]==' ')) { /*OMP*/ if ((prefix[1]=='$') && ((prefix[2]==' ') || isdigit(prefix[2]))) { /*OMP*/
if(OMP_program==1 ) { if(OMP_program==1 ) {
for (p = prefix; p < prefixend; p++) {/*OMP*/ for (p = prefix; p < prefixend; p++) {/*OMP*/
*p = ' ';/*OMP*/ *p = ' ';/*OMP*/
@@ -1512,7 +1512,7 @@ top:
for (; p < prefixend; p++) for (; p < prefixend; p++)
*p = ' '; *p = ' ';
if ((prefix[1]=='$') && (prefix[2]!='O') && (prefix[2]!='o')) { /*OMP*/ if ((prefix[1]=='$') && ((prefix[2]==' ') || (prefix[2]=='&'))) { /*OMP*/
if (OMP_program == 1) { /*OMP*/ if (OMP_program == 1) { /*OMP*/
for (p = prefix; p < prefixend; p++) {/*OMP*/ for (p = prefix; p < prefixend; p++) {/*OMP*/
*p = ' ';/*OMP*/ *p = ' ';/*OMP*/

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

@@ -1,3 +1,3 @@
#pragma once #pragma once
#define VERSION_SPF "2226" #define VERSION_SPF "2227"