Commit 17339e88 by Tobias Burnus Committed by Tobias Burnus

match.c (gfc_match_namelist): Add missing space to error message.

2006-11-14  Tobias Burnus  <burnus@net-b.de>

       * match.c (gfc_match_namelist): Add missing space to
         error message.

From-SVN: r118820
parent 1f3a64d1
2006-11-14 Tobias Burnus <burnus@net-b.de> 2006-11-14 Tobias Burnus <burnus@net-b.de>
* match.c (gfc_match_namelist): Add missing space to
error message.
2006-11-14 Tobias Burnus <burnus@net-b.de>
PR fortran/29657 PR fortran/29657
* symbol.c (check_conflict): Add further conflicts. * symbol.c (check_conflict): Add further conflicts.
......
...@@ -2598,7 +2598,7 @@ gfc_match_namelist (void) ...@@ -2598,7 +2598,7 @@ gfc_match_namelist (void)
these are the only errors for the next two lines. */ these are the only errors for the next two lines. */
if (sym->as && sym->as->type == AS_ASSUMED_SIZE) if (sym->as && sym->as->type == AS_ASSUMED_SIZE)
{ {
gfc_error ("Assumed size array '%s' in namelist '%s'at " gfc_error ("Assumed size array '%s' in namelist '%s' at "
"%C is not allowed.", sym->name, group_name->name); "%C is not allowed.", sym->name, group_name->name);
gfc_error_check (); gfc_error_check ();
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment