1  /* PR c/26171 */
       2  /* { dg-do run } */
       3  /* { dg-options "-O0" } */
       4  /* { dg-require-effective-target tls_runtime } */
       5  
       6  int thrv = 0;
       7  #pragma omp threadprivate (thrv)
       8  
       9  int
      10  main ()
      11  {
      12    thrv = 1;
      13    return 0;
      14  }