123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131 |
- /* PR middle-end/35130 */
- extern void abort (void);
- void
- f1 (void)
- {
- int a[4], k;
- void nested (int x)
- {
- a[x] = 42;
- }
- for (k = 0; k < 4; k++)
- a[k] = 0;
- #pragma omp parallel for
- for (k = 0; k < 4; k++)
- nested (k);
- if (a[0] != 42 || a[1] != 42 || a[2] != 42 || a[3] != 42)
- abort ();
- }
- void
- f2 (void)
- {
- int a[4], k;
- void nested (void)
- {
- int l;
- void nested2 (int x)
- {
- a[x] = 42;
- }
- #pragma omp parallel for
- for (l = 0; l < 4; l++)
- nested2 (l);
- }
- for (k = 0; k < 4; k++)
- a[k] = 0;
- nested ();
- if (a[0] != 42 || a[1] != 42 || a[2] != 42 || a[3] != 42)
- abort ();
- }
- void
- f3 (void)
- {
- int a[4], b[4], c[4], k;
- void nested (int x)
- {
- a[x] = b[x] = c[x] = 42;
- }
- for (k = 0; k < 4; k++)
- a[k] = b[k] = c[k] = 0;
- nested (0);
- #pragma omp parallel
- {
- #pragma omp single
- {
- a[1] = 43;
- b[1] = 43;
- }
- #pragma omp parallel
- {
- #pragma omp single
- {
- b[2] = 44;
- c[2] = 44;
- }
- }
- }
- if (a[0] != 42 || a[1] != 43 || a[2] != 0 || a[3] != 0)
- abort ();
- if (b[0] != 42 || b[1] != 43 || b[2] != 44 || b[3] != 0)
- abort ();
- if (c[0] != 42 || c[1] != 0 || c[2] != 44 || c[3] != 0)
- abort ();
- }
- void
- f4 (void)
- {
- int a[4], b[4], c[4], k;
- void nested ()
- {
- #pragma omp parallel
- {
- #pragma omp single
- {
- a[1] = 43;
- b[1] = 43;
- }
- #pragma omp parallel
- {
- #pragma omp single
- {
- b[2] = 44;
- c[2] = 44;
- }
- }
- }
- }
- for (k = 0; k < 4; k++)
- a[k] = b[k] = c[k] = k == 0 ? 42 : 0;
- nested ();
- if (a[0] != 42 || a[1] != 43 || a[2] != 0 || a[3] != 0)
- abort ();
- if (b[0] != 42 || b[1] != 43 || b[2] != 44 || b[3] != 0)
- abort ();
- if (c[0] != 42 || c[1] != 0 || c[2] != 44 || c[3] != 0)
- abort ();
- }
- int
- main (void)
- {
- f1 ();
- f2 ();
- f3 ();
- f4 ();
- return 0;
- }
|