re PR fortran/29459 (Spurious warnings about anonymous variables)

PR fortran/29459
	* trans.c (gfc_create_var_np): Do not emit warnings for
	anonymous variables.

From-SVN: r127513
This commit is contained in:
Francois-Xavier Coudert 2007-08-15 12:39:18 +00:00 committed by François-Xavier Coudert
parent ee5d176a88
commit 049e4fb094
2 changed files with 15 additions and 1 deletions

View File

@ -1,3 +1,9 @@
2007-08-15 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
PR fortran/29459
* trans.c (gfc_create_var_np): Do not emit warnings for
anonymous variables.
2007-08-15 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
PR fortran/33066

View File

@ -102,7 +102,15 @@ remove_suffix (char *name, int len)
tree
gfc_create_var_np (tree type, const char *prefix)
{
return create_tmp_var_raw (type, prefix);
tree t;
t = create_tmp_var_raw (type, prefix);
/* No warnings for anonymous variables. */
if (prefix == NULL)
TREE_NO_WARNING (t) = 1;
return t;
}