pr26171.c 208 B

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