Fortran/Openmp: Use OPT_Wopenmp for gfc_match_omp_depobj warning

gcc/fortran/ChangeLog:

	* openmp.cc (gfc_match_omp_depobj): Use OPT_Wopenmp
	as warning category in gfc_warning.
This commit is contained in:
Tobias Burnus 2024-02-23 13:12:48 +01:00
parent 016c4eed36
commit 9266d9fce2

View file

@ -4768,8 +4768,8 @@ gfc_match_omp_depobj (void)
if (gfc_match (" ( %v ) ", &destroyobj) == MATCH_YES)
{
if (destroyobj->symtree != depobj->symtree)
gfc_warning (0, "The same depend object should be used as DEPOBJ "
"argument at %L and as DESTROY argument at %L",
gfc_warning (OPT_Wopenmp, "The same depend object should be used as"
" DEPOBJ argument at %L and as DESTROY argument at %L",
&depobj->where, &destroyobj->where);
gfc_free_expr (destroyobj);
}