Changes between Version 3 and Version 4 of MPITransformation

Timestamp:

05/14/14 10:08:18 (12 years ago)

Author:

zmanchun

Comment:

--

MPITransformation

@@ -31 +31 @@
 $input int NPROCS_LOWER;
 $assume NPROCS_LOWER < NPROCS && NPROCS <= NPROCS_UPPER;
-$gcomm GCOMM_WORLD = $gcomm_create($here, NPROCS);
+CMPI_Gcomm GCOMM_WORLD = CMPI_Gcomm_create($here, NPROCS);
 
 void MPI_Process(int _rank){
@@ -46 +46 @@
     $wait(procs[i]);
   }
-  $gcomm_destroy(GCOMM_WORLD);
+  CMPI_Gcomm_destroy(GCOMM_WORLD);
 }
 }}}
@@ -53 +53 @@
 
 {{{
-void MPI_Process(){
-  $comm MPI_COMM_WORLD = $comm_create(...);
+void MPI_Process(int _rank){
+  MPI_Comm MPI_COMM_WORLD = MPI_Comm_create($here, _rank);
   
   //SLIGHTLY-MODIFIED ORIGINAL PROGRAM;
@@ -64 +64 @@
   //ORIGINAL PROGRAM ENDS HERE;
   __main();
-  $comm_destroy(MPI_COMM_WORLD);
+  MPI_Comm_destroy(MPI_COMM_WORLD);
 }
 }}}