* varasm.c (default_section_type_flags): Handle tls data and

        default sections.
        (default_unique_section): Handle tls sections.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@53753 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 88f72e4..9ededbc 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+2002-05-22  Richard Henderson  <rth@redhat.com>
+
+       * varasm.c (default_section_type_flags): Handle tls data and
+       default sections.
+       (default_unique_section): Handle tls sections.
+
 2002-05-23  Alan Modra  <amodra@bigpond.net.au>
 
        * configure.in (CROSS): Define NATIVE_CROSS.

diff --git a/gcc/testsuite/gcc.dg/tls/section-1.c b/gcc/testsuite/gcc.dg/tls/section-1.c
new file mode 100644 (file)
index 0000000..741eadb
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/tls/section-1.c
@@ -0,0 +1,11 @@
+/* Verify that we get errors for trying to put TLS data in 
+   sections which can't work.  */
+
+#define A(X)   __attribute__((section(X)))
+
+__thread int i A("foo");               /* Ok */
+
+__thread int j A(".data");  /* { dg-error "causes a section type conflict" "conflict with .data section" { xfail *-*-* } } */
+
+int k A("bar");
+__thread int l A("bar");  /* { dg-error "causes a section type conflict" "conflict with user-defined section" } */

diff --git a/gcc/varasm.c b/gcc/varasm.c
index 3165b92..0c4b3cd 100644 (file)
--- a/gcc/varasm.c
+++ b/gcc/varasm.c
@@ -5105,17 +5105,23 @@ default_section_type_flags (decl, name, reloc)
   if (decl && DECL_ONE_ONLY (decl))
     flags |= SECTION_LINKONCE;
 
+  if (decl && DECL_THREAD_LOCAL (decl))
+    flags |= SECTION_TLS | SECTION_WRITE;
+
   if (strcmp (name, ".bss") == 0
       || strncmp (name, ".bss.", 5) == 0
       || strncmp (name, ".gnu.linkonce.b.", 16) == 0
       || strcmp (name, ".sbss") == 0
       || strncmp (name, ".sbss.", 6) == 0
       || strncmp (name, ".gnu.linkonce.sb.", 17) == 0
-      || strcmp (name, ".tbss") == 0)
+      || strcmp (name, ".tbss") == 0
+      || strncmp (name, ".gnu.linkonce.tb.", 17) == 0)
     flags |= SECTION_BSS;
 
   if (strcmp (name, ".tdata") == 0
-      || strcmp (name, ".tbss") == 0)
+      || strcmp (name, ".tbss") == 0
+      || strncmp (name, ".gnu.linkonce.td.", 17) == 0
+      || strncmp (name, ".gnu.linkonce.tb.", 17) == 0)
     flags |= SECTION_TLS;
 
   return flags;
@@ -5495,7 +5501,11 @@ default_unique_section (decl, reloc)
       prefix = one_only ? ".gnu.linkonce.sb." : ".sbss.";
       break;
     case SECCAT_TDATA:
+      prefix = one_only ? ".gnu.linkonce.td." : ".tdata.";
+      break;
     case SECCAT_TBSS:
+      prefix = one_only ? ".gnu.linkonce.tb." : ".tbss.";
+      break;
     default:
       abort ();
     }