gcc/fortran/parse.c

40 static bool last_was_use_stmt = false;
124   last_was_use_stmt = false;
164       last_was_use_stmt = true;
170       if (last_was_use_stmt)
324 	  last_was_use_stmt = true;
331   if (last_was_use_stmt)
906 verify_token_free (const char* token, int length, bool last_was_use_stmt)
917   if (last_was_use_stmt)
1013 	      verify_token_free ("$omp", 4, last_was_use_stmt);
1024 		  verify_token_free ("omp", 3, last_was_use_stmt);
1029 		  verify_token_free ("acc", 3, last_was_use_stmt);
1035 	      verify_token_free ("$acc", 4, last_was_use_stmt);
1057 verify_token_fixed (const char *token, int length, bool last_was_use_stmt)
1071   if (last_was_use_stmt)
1140 		  if (!verify_token_fixed ("omp", 3, last_was_use_stmt))
1150 		      if (!verify_token_fixed ("mp", 2, last_was_use_stmt))
1156 		      if (!verify_token_fixed ("cc", 2, last_was_use_stmt))
1163 		  if (!verify_token_fixed ("acc", 3, last_was_use_stmt))