utils.c (process_attributes): Use set_decl_section_name accessor.

	* gcc-interface/utils.c (process_attributes) <ATTR_LINK_SECTION>: Use
	set_decl_section_name accessor.

From-SVN: r211370

gcc/ada/ChangeLog

-2014-06-07  Jan Hubicka  <hubicka@ucw.cz>
+2014-06-09  Jan Hubicka  <hubicka@ucw.cz>
 
-	* gcc-interface/utils.c (process_attributes): Use it.
+	* gcc-interface/utils.c (process_attributes) <ATTR_LINK_SECTION>: Use
+	set_decl_section_name accessor.
 
 2014-05-22  Thomas Schwinge  <thomas@codesourcery.com>
 

gcc/ada/gcc-interface/utils.c

@@ -2476,9 +2476,9 @@ process_attributes (tree *node, struct attrib **attr_list, bool in_place,
       case ATTR_LINK_SECTION:
 	if (targetm_common.have_named_sections)
 	  {
-	    set_decl_section_name (*node,
-				   build_string (IDENTIFIER_LENGTH (attr->name),
-						 IDENTIFIER_POINTER (attr->name)));
+	    tree name = build_string (IDENTIFIER_LENGTH (attr->name),
+				      IDENTIFIER_POINTER (attr->name));
+	    set_decl_section_name (*node, name);
 	    DECL_COMMON (*node) = 0;
 	  }
 	else