Mercurial > hg > CbC > CbC_gcc

comparison libgomp/testsuite/libgomp.c/appendix-a/a.21.1.c @ 0:a06113de4d67

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
first commit
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Fri, 17 Jul 2009 14:47:48 +0900
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:a06113de4d67
1 /* { dg-do run } */
2
3 #include <stdio.h>
4 void
5 work (int k)
6 {
7 #pragma omp ordered
8 printf (" %d\n", k);
9 }
10
11 void
12 a21 (int lb, int ub, int stride)
13 {
14 int i;
15 #pragma omp parallel for ordered schedule(dynamic)
16 for (i = lb; i < ub; i += stride)
17 work (i);
18 }
19
20 int
21 main ()
22 {
23 a21 (0, 100, 5);
24 return 0;
25 }