obtained gcc-4.6.4.tar.bz2 from upstream website;upstream

verified gcc-4.6.4.tar.bz2.sig;
imported gcc-4.6.4 source tree from verified upstream tarball.

downloading a git-generated archive based on the 'upstream' tag
should provide you with a source tree that is binary identical
to the one extracted from the above tarball.

if you have obtained the source via the command 'git clone',
however, do note that line-endings of files in your working
directory might differ from line-endings of the respective
files in the upstream repository.

6 files changed, 142 insertions, 0 deletions

diff --git a/gcc/testsuite/obj-c++.dg/torture/tls/diag-1.mm b/gcc/testsuite/obj-c++.dg/torture/tls/diag-1.mm
new file mode 100644
index 000000000..7c3245d9f
--- /dev/null
+++ b/gcc/testsuite/obj-c++.dg/torture/tls/diag-1.mm
@@ -0,0 +1,12 @@
+// Valid __thread specifiers.
+// { dg-require-effective-target tls }
+
+__thread int g1;
+extern __thread int g2;
+static __thread int g3;
+
+void foo()
+{
+  extern __thread int l1;
+  static __thread int l2;
+}
diff --git a/gcc/testsuite/obj-c++.dg/torture/tls/thr-init-1.mm b/gcc/testsuite/obj-c++.dg/torture/tls/thr-init-1.mm
new file mode 100644
index 000000000..62e322ed1
--- /dev/null
+++ b/gcc/testsuite/obj-c++.dg/torture/tls/thr-init-1.mm
@@ -0,0 +1,25 @@
+// { dg-do run }
+// { dg-require-effective-target tls }
+// { dg-add-options tls }
+
+extern "C" {
+extern void abort ();
+}
+
+static __thread int fstat = 1;
+
+int test_code(int b)
+{
+  fstat += b ;
+  return fstat;
+}
+
+int main (int ac, char *av[])
+{
+  int a = test_code(1);
+  
+  if ( a != 2 || fstat != 2 ) 
+    abort ();
+  
+  return 0;
+}
diff --git a/gcc/testsuite/obj-c++.dg/torture/tls/thr-init-2.mm b/gcc/testsuite/obj-c++.dg/torture/tls/thr-init-2.mm
new file mode 100644
index 000000000..4e3f8e6e3
--- /dev/null
+++ b/gcc/testsuite/obj-c++.dg/torture/tls/thr-init-2.mm
@@ -0,0 +1,45 @@
+// { dg-do run }
+// { dg-require-effective-target tls }
+// { dg-add-options tls }
+
+extern "C" {
+extern void abort ();
+}
+
+__thread int glb =1 ;
+
+static __thread int fstat = 2;
+
+int fa(int a)
+{
+static __thread int as = 3;
+  as += a ;
+  return as;
+}
+
+int fb(int b)
+{
+static __thread int bs = 4;
+  bs += b ;
+  glb = bs;
+  return bs;
+}
+
+int main (int ac, char *av[])
+{
+  int a = 1;
+  
+  a = fa(fstat);
+  if ( a != 5 ) 
+    abort () ;
+
+  a = fa(glb);
+  if ( a != 6 ) 
+    abort () ;
+
+  a = fb(a);  
+  if ( a != 10 || glb != 10 ) 
+    abort () ;
+  
+  return 0;
+}
diff --git a/gcc/testsuite/obj-c++.dg/torture/tls/thr-init-3.mm b/gcc/testsuite/obj-c++.dg/torture/tls/thr-init-3.mm
new file mode 100644
index 000000000..29768886a
--- /dev/null
+++ b/gcc/testsuite/obj-c++.dg/torture/tls/thr-init-3.mm
@@ -0,0 +1,41 @@
+/* { dg-do run } */
+/* { dg-require-effective-target tls } */
+/* { dg-add-options tls } */
+/* { dg-xfail-run-if "Needs OBJC2 ABI" { *-*-darwin* && { lp64 && { ! objc2 } } } { "-fnext-runtime" } { "" } } */
+/* { dg-additional-sources "../../../objc-obj-c++-shared/Object1.mm" } */
+
+#include "../../../objc-obj-c++-shared/Object1.h"
+extern "C" {
+extern void abort ();
+}
+
+@interface tsObj: Object {
+  int ai ;
+}
+
+- (int) fa:(int) n;
+
+@end
+
+@implementation tsObj
+
+- (int) fa:(int) n
+{
+static __thread int as = 3;
+  as += n ;
+  return as ;
+}
+
+@end
+
+int main (int ac, char *av[])
+{
+  int a ;
+  tsObj *to = [tsObj new];
+  
+  a = [to fa:5];
+  if ( a != 8 ) 
+    abort () ;
+  
+  return 0;
+}
diff --git a/gcc/testsuite/obj-c++.dg/torture/tls/tls.exp b/gcc/testsuite/obj-c++.dg/torture/tls/tls.exp
new file mode 100644
index 000000000..6d0668045
--- /dev/null
+++ b/gcc/testsuite/obj-c++.dg/torture/tls/tls.exp
@@ -0,0 +1,16 @@
+# This harness is for tests that should be run at all optimisation levels.
+
+load_lib obj-c++-dg.exp
+
+dg-init
+# Gather a list of all tests.
+set tests [lsort [glob -nocomplain $srcdir/$subdir/*.mm]]
+
+obj-c++-dg-runtest $tests "-fgnu-runtime"
+
+# darwin targets can also run code with the NeXT runtime.
+if [istarget "*-*-darwin*" ] {
+  obj-c++-dg-runtest $tests "-fnext-runtime"
+}
+
+dg-finish
diff --git a/gcc/testsuite/obj-c++.dg/torture/tls/trivial.mm b/gcc/testsuite/obj-c++.dg/torture/tls/trivial.mm
new file mode 100644
index 000000000..e2b8f45b8
--- /dev/null
+++ b/gcc/testsuite/obj-c++.dg/torture/tls/trivial.mm
@@ -0,0 +1,3 @@
+// { dg-require-effective-target tls }
+
+__thread int i;