Changes between Version 16 and Version 17 of MessagePassing

Timestamp:

09/13/13 08:52:39 (13 years ago)

Author:

siegel

Comment:

--

MessagePassing

@@ -21 +21 @@
 * `$comm`
  * an abstract datatype representing a communicator, or set of message channels between every pair of processes in a set of processes
-* `$comm $comm_create(int nprocs, $proc[] procs)`
+* `$comm $comm_create(int nprocs, $proc procs[])`
  * creates a new comm from the given sequence of processes, by allocating memory and copying the process sequence; the new comm has no messages
 * `int $comm_nprocs($comm comm)`
  * returns the number of processes associated to the comm
-* `$proc[] $comm_procs($comm comm)`
+* `$proc $comm_getProc($comm comm, int pid)`
  * returns a pointer to the procs array in comm
 * `$comm $comm_enqueue($comm comm, $message message)`
@@ -64 +64 @@
 typedef $comm *MPI_Comm;
 $comm MPI_Comm_world_comm;
-MPI_Comm *MPI_COMM_WORLD = &_MPI_COMM_WORLD;
+MPI_Comm *MPI_COMM_WORLD = &MPI_Comm_world_comm;
 boolean initialized = $false;
 
@@ -94 +94 @@
   $message m = $message_pack(pid, dest, tag, buf, sizeofDatatype(type)*count);
 
-  $comm_enqueue(comm, &m);
+  *comm = $comm_enqueue(*comm, m);
 }
 
@@ -100 +100 @@
   int size = sizeofDatatype(type)*count;
   // the following is a system function with built-in guard:
-  $message m = $comm_dequeue(comm, source, pid, tag);
+  $message m = $comm_dequeue(*comm, source, pid, tag);
 
-  status->size = $message_size(&m);
-  status->source = $message_source(&m);
-  status->dest = $message_dest(&m);
-  $message_unpack(&m, buf, size); // will throw exception if message too big
+  status->size = $message_size(m);
+  status->source = $message_source(m);
+  status->dest = $message_dest(m);
+  $message_unpack(m, buf, size); // will throw exception if message too big
 }
 
@@ -121 +121 @@
 }
 }}}
-