mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-02-22 19:39:53 +08:00
Code Issues Packages Projects Releases Wiki Activity

re PR fortran/27897 (ICE on common block with the same name as the program.)

Browse Source 
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.

	* fortran/ChangeLog : Fix typo: 20838 to 20839.
	* testsuite/ChangeLog : The same.

From-SVN: r114422
This commit is contained in:
Paul Thomas 2006-06-06 04:15:17 +00:00
parent 52fd3667e2
commit 0d3b0abea3
3 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gcc/fortran/ChangeLog
View File

@ -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.

2
gcc/fortran/match.c
View File

@ -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;
}

2
gcc/testsuite/ChangeLog
View File

@ -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