URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [gomp/] [combined-1.c] - Rev 378
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do compile } */ /* { dg-options "-O1 -fopenmp -fdump-tree-optimized" } */ int a[10]; int foo (void) { int i; #pragma omp parallel for schedule(runtime) for (i = 0; i < 10; i++) a[i] = i; #pragma omp parallel #pragma omp for schedule(runtime) for (i = 0; i < 10; i++) a[i] = 10 - i; #pragma omp parallel { #pragma omp for schedule(runtime) for (i = 0; i < 10; i++) a[i] = i; } } /* { dg-final { scan-tree-dump-times "GOMP_parallel_loop_runtime_start" 3 "optimized" } } */ /* { dg-final { cleanup-tree-dump "optimized" } } */
Go to most recent revision | Compare with Previous | Blame | View Log