1 /* { dg-do run } */
2 /* { dg-options "-O2" } */
3 /* { dg-require-effective-target tls_runtime } */
4 /* { dg-add-options tls } */
5 
6 __thread double thrtest[81];
main()7 int main ()
8 {
9   double *p, *e;
10   e = &thrtest[81];
11   for (p = &thrtest[0]; p < e; ++p)
12     *p = 1.0;
13   return 0;
14 }
15