/gcc/testsuite/gcc.dg/gomp/for-13.c

https://gitlab.com/sortix/gcc · C · 18 lines · 8 code · 4 blank · 6 comment · 2 complexity · 4157d172dbb3894d5157c8d78d7dc222 MD5 · raw file 

    

  1. // At one point in development, a typo disabled the remapping of the
    2. 

  2. // for iteration variable as private.
    3. 

  3. 

  4. // { dg-do compile }
    5. 

  5. // { dg-options "-fopenmp -fdump-tree-ompexp" }
    6. 

  6. 

  7. extern void bar(int);
    8. 

  8. void foo(void)
    9. 

  9. {
    10. 

  10.   int i;
    11. 

  11. 

  12. #pragma omp parallel for default(none)
    13. 

  13.   for (i = 0; i < 10; i++)
    14. 

  14.     bar(i);
    15. 

  15. }
    16. 

  16. 

  17. // { dg-final { scan-tree-dump-times "omp_data_o" 0 "ompexp" } }
    18. 

  18. // { dg-final { cleanup-tree-dump "ompexp" } }
    19.