diff options
| -rw-r--r-- | gcc/fortran/ChangeLog | 8 | ||||
| -rw-r--r-- | gcc/fortran/match.c | 2 | ||||
| -rw-r--r-- | gcc/testsuite/ChangeLog | 2 |
3 files changed, 9 insertions, 3 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 776394e71e6..e916c28e2f4 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,9 @@ +2006-06-06 Paul Thomas <pault@gcc.gnu.org> + + PR fortran/27897 + * match.c (gfc_match_common): Fix code typo. Remove + sym->name, since sym is NULL, and replace with name. + 2006-06-05 Francois-Xavier Coudert <coudert@clipper.ens.fr> PR libfortran/27895 @@ -21,7 +27,7 @@ (gfc_add_type): If a procedure and types are the same do not throw an error unless standard is less than gnu or pedantic. - PR fortran/20838 + PR fortran/20839 * parse.c (parse_do_block): Error if named block do construct does not have a named enddo. diff --git a/gcc/fortran/match.c b/gcc/fortran/match.c index 81bbb233815..ab01ad6beb1 100644 --- a/gcc/fortran/match.c +++ b/gcc/fortran/match.c @@ -2293,7 +2293,7 @@ gfc_match_common (void) if (gsym->type != GSYM_UNKNOWN && gsym->type != GSYM_COMMON) { gfc_error ("Symbol '%s' at %C is already an external symbol that is not COMMON", - sym->name); + name); goto cleanup; } diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 2a597d4156e..ace5b3f3ea9 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -29,7 +29,7 @@ PR fortran/16943 * gfortran.dg/func_decl_2.f90: New test. - PR fortran/20838 + PR fortran/20839 * gfortran.dg/do_2.f90: New test. PR fortran/27655 |
