source: CIVL/examples/omp/transform/omp_parallel.c@ 397ae5f

main test-branch
Last change on this file since 397ae5f was ea777aa, checked in by Alex Wilton <awilton@…>, 3 years ago

Moved examples, include, build_default.properties, common.xml, and README out from dev.civl.com into the root of the repo.

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@5704 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100644
File size: 224 bytes
Line 
1#include <civlc.cvh>
2
3int main () {
4 int x[10] = {1, 2, 3};
5 int y = -1;
6
7#pragma omp parallel for firstprivate(y) shared(x)
8 for (int i=0; i<10; i+=1)
9 {
10 y = i+y;
11 x[i] = y;
12 }
13 $assert(y == -1);
14 return 0;
15}
Note: See TracBrowser for help on using the repository browser.