source: CIVL/examples/gen/simpleMPI.c@ ff25b9a

1.23 2.0 main test-branch
Last change on this file since ff25b9a was efd4f32, checked in by Manchun Zheng <zmanchun@…>, 11 years ago

fixed general transformer in the way that it deals with the main function; fixed CUDA and MPI transformer accordingly; added tests for the general transformer.

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

  • Property mode set to 100644
File size: 399 bytes
Line 
1#include<mpi.h>
2#include<assert.h>
3
4int myrank;
5
6int main(int argc, char* argv[]) {
7 double buf = 0.0;
8
9 MPI_Init(&argc, &argv);
10 MPI_Comm_rank(MPI_COMM_WORLD, &myrank);
11 if(myrank == 0) {
12 buf = 1.0;
13 MPI_Send(&buf, 1, MPI_DOUBLE, 1, 0, MPI_COMM_WORLD);
14 } else {
15 MPI_Recv(&buf, 1, MPI_DOUBLE, 0, 0, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
16 }
17 assert(buf == 1.0);
18 MPI_Finalize();
19}
Note: See TracBrowser for help on using the repository browser.