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

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index ccc2bc2..7cbfba0 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,6 +1,7 @@
-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>
 

diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c
index 71761e3..5b32f20 100644 (file)
--- a/gcc/ada/gcc-interface/utils.c
+++ b/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