Update intercomm-async.c

src/intercomm-async.c

@@ -2,7 +2,7 @@
 #include <stdio.h>
 #include <unistd.h>
 
-#define SIZE 100 /* Buffer size */
+#define SIZE 100000 /* Buffer size */
 
 int main( int argc, char *argv[] )
 {
@@ -11,7 +11,6 @@ int main( int argc, char *argv[] )
   char buffer[SIZE+1] = { '\0' };
   char hostname[SIZE+1] = { '\0' };
   int tag = 5;
-  int slots = 4;
   MPI_Status status;
   MPI_Request send_request,recv_request;
 
@@ -22,10 +21,10 @@ int main( int argc, char *argv[] )
   MPI_Comm_size(MPI_COMM_WORLD, &size);
 
   sprintf(&buffer, "an async message from %d (running on %s)", rank, &hostname);
-  MPI_Isend(&buffer, SIZE, MPI_CHAR, (rank+1)%slots, tag, MPI_COMM_WORLD, &send_request);
+  MPI_Isend(&buffer, SIZE, MPI_CHAR, (rank+1)%size, tag, MPI_COMM_WORLD, &send_request);
   MPI_Wait(&send_request, &status);
   printf( "Hello, world!\nI am a rank %d process running from %s and my size is %d, I sent %s, ", rank, &hostname, size, &buffer);
-  MPI_Irecv(&buffer, SIZE, MPI_CHAR, (rank-1)%slots, tag, MPI_COMM_WORLD, &recv_request);
+  MPI_Irecv(&buffer, SIZE, MPI_CHAR, (rank-1)%size, tag, MPI_COMM_WORLD, &recv_request);
   MPI_Wait(&recv_request, &status);
   printf("I received %s\n", buffer);
   MPI_Finalize();