/* A simple bugged MPI_ISend and MPI_IRecv test */
-/* Copyright (c) 2009, 2011, 2013-2014. The SimGrid Team.
+/* Copyright (c) 2009-2018. The SimGrid Team.
* All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
#include <mpi.h>
#include <simgrid/modelchecker.h>
-
int main(int argc, char **argv)
{
- int x,y, err, size, rank;
+ int x;
+ int y;
+ int size;
+ int rank;
MPI_Status status;
/* Initialize MPI */
- err = MPI_Init(&argc, &argv);
+ int err = MPI_Init(&argc, &argv);
if (err != MPI_SUCCESS) {
printf("MPI initialization failed!\n");
exit(1);
}
- err = MPI_Comm_size(MPI_COMM_WORLD, &size); /* Get nr of tasks */
- err = MPI_Comm_rank(MPI_COMM_WORLD, &rank); /* Get id of this process */
+ MPI_Comm_size(MPI_COMM_WORLD, &size); /* Get nr of tasks */
+ MPI_Comm_rank(MPI_COMM_WORLD, &rank); /* Get id of this process */
if (size % 3 != 0) {
printf("run this program with exactly 3*N processes \n");
MPI_Finalize();