diff --git a/dvm/fdvm/trunk/parser/lexfdvm.c b/dvm/fdvm/trunk/parser/lexfdvm.c index 13285a0..686e44c 100644 --- a/dvm/fdvm/trunk/parser/lexfdvm.c +++ b/dvm/fdvm/trunk/parser/lexfdvm.c @@ -1177,7 +1177,7 @@ top: is_directive_omp = 1; /*OMP*/ --lines_returned; /*OMP*/ goto top;/*OMP*/ - } else { + } else if(SAPFOR==0) { warn_line("Ignoring line with OpenMP conditional compilation sentinel ($)", 664, lines_returned); prefix[1] ='!'; } @@ -1203,7 +1203,7 @@ top: is_directive_omp = 1; /*OMP*/ -- lines_returned; /*OMP*/ goto body; /*OMP*/ - } else { + } else if(SAPFOR==0) { warn_line("Ignoring OpenMP derective", 664, lines_returned); prefix[1] = '!'; } @@ -1521,7 +1521,7 @@ top: is_directive_omp = 1; /*OMP*/ --lines_returned; /*OMP*/ goto top;/*OMP*/ - } else { /*OMP*/ + } else if(SAPFOR==0) { /*OMP*/ warn_line("Ignoring line with OpenMP conditional compilation sentinel ($)", 664, lines_returned); /*OMP*/ prefix[1] ='!'; /*OMP*/ } @@ -1543,7 +1543,7 @@ top: is_directive_hpf = 1; /*OMP*/ is_directive_omp = 1; /*OMP podd*/ goto body; /*OMP*/ - } else { /*OMP*/ + } else if(SAPFOR==0) { /*OMP*/ warn_line("Ignoring OpenMP derective", 664, lines_returned); /*OMP*/ prefix[1] = '!'; /*OMP*/ } /*OMP*/ diff --git a/sapfor/experts/Sapfor_2017/_src/Utils/version.h b/sapfor/experts/Sapfor_2017/_src/Utils/version.h index f665c66..7e2ea41 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 "2227" +#define VERSION_SPF "2228"