60 static int openmp_flag, openacc_flag;  variable
775 	      openmp_flag = 1;  in skip_free_omp_sentinel()
864 			openmp_flag = openacc_flag = 0;  in skip_free_comments()
889 			openmp_flag = 0;  in skip_free_comments()
928   if (openmp_flag && at_bol)  in skip_free_comments()
929     openmp_flag = 0;  in skip_free_comments()
959 	      openmp_flag = 1;  in skip_fixed_omp_sentinel()
1189   openmp_flag = 0;  in skip_fixed_comments()
1244 	  if (openmp_flag  in gfc_next_char_literal()
1312 	prev_openmp_flag = openmp_flag;  in gfc_next_char_literal()
1354 	if (prev_openmp_flag != openmp_flag && !openacc_flag)  in gfc_next_char_literal()
1357 	    openmp_flag = prev_openmp_flag;  in gfc_next_char_literal()
1363 	if (prev_openacc_flag != openacc_flag && !openmp_flag)  in gfc_next_char_literal()
1382       if (openmp_flag && !openacc_flag)  in gfc_next_char_literal()
1393       if (openacc_flag && !openmp_flag)  in gfc_next_char_literal()
1409       if (openacc_flag && openmp_flag)  in gfc_next_char_literal()
1440 	  else if (openmp_flag || openacc_flag || openmp_cond_flag)  in gfc_next_char_literal()
1482 	prev_openmp_flag = openmp_flag;  in gfc_next_char_literal()
1501       if (flag_openmp && openmp_flag != prev_openmp_flag && !openacc_flag)  in gfc_next_char_literal()
1503 	  openmp_flag = prev_openmp_flag;  in gfc_next_char_literal()
1506       if (flag_openacc && openacc_flag != prev_openacc_flag && !openmp_flag)  in gfc_next_char_literal()
1515       if (openacc_flag && openmp_flag)  in gfc_next_char_literal()
1530       else if (!openmp_flag && !openacc_flag)  in gfc_next_char_literal()
1537       else if (openmp_flag)  in gfc_next_char_literal()
2373   openmp_flag = 0;  in include_stmt()
2468   openmp_flag = 0;  in include_stmt()