re PR fortran/16336 (ICE with common block in module)

PR fortran/16336
* match.c (match_common): Fix error reporting for used common.

From-SVN: r84462
This commit is contained in:
Tobias Schlüter 2004-07-10 18:26:05 +02:00 committed by Tobias Schlüter
parent 33dc5b0b3e
commit 794ba78be2
2 changed files with 4 additions and 1 deletions

View File

@ -3,6 +3,9 @@
* expr.c (gfc_check_pointer_assign): Verify that rank of the LHS
and RHS match. Return early if the RHS is NULL().
PR fortran/16336
* match.c (match_common): Fix error reporting for used common.
2004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
* trans-common.c: Fix whitespace issues, make variable names

View File

@ -2146,7 +2146,7 @@ gfc_match_common (void)
if (t->use_assoc)
{
gfc_error ("COMMON block '%s' at %C has already "
"been USE-associated");
"been USE-associated", name);
goto cleanup;
}
}