re PR fortran/34722 (ICE: left-over "@iostat" variable polutes namespace)

2008-01-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR fortran/34722
	* trans-io.c (create_dummy_iostat): Commit the symbol.

From-SVN: r131475

gcc/fortran/ChangeLog

+2008-01-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+	PR fortran/34722
+	* trans-io.c (create_dummy_iostat): Commit the symbol.
+
 2008-01-11  Paul Thomas  <pault@gcc.gnu.org>
 
 	PR fortran/34537

gcc/fortran/trans-io.c

@@ -1095,6 +1095,7 @@ create_dummy_iostat (void)
   st->n.sym->ts.type = BT_INTEGER;
   st->n.sym->ts.kind = gfc_default_integer_kind;
   gfc_set_sym_referenced (st->n.sym);
+  gfc_commit_symbol (st->n.sym);
   st->n.sym->backend_decl
 	= gfc_create_var (gfc_get_int_type (st->n.sym->ts.kind),
 			  st->n.sym->name);