Fortran - improve wording of error message

gcc/fortran/ChangeLog:

	PR fortran/56985
	* resolve.c (resolve_common_vars): Fix grammar and improve wording
	of error message rejecting an unlimited polymorphic in COMMON.
This commit is contained in:
Harald Anlauf 2021-09-01 19:05:47 +02:00
parent 7a6f40d045
commit a88280cff3
1 changed files with 1 additions and 1 deletions

View File

@ -979,7 +979,7 @@ resolve_common_vars (gfc_common_head *common_block, bool named_common)
}
if (UNLIMITED_POLY (csym))
gfc_error_now ("%qs in cannot appear in COMMON at %L "
gfc_error_now ("%qs at %L cannot appear in COMMON "
"[F2008:C5100]", csym->name, &csym->declared_at);
if (csym->ts.type != BT_DERIVED)