MPI_Datatype row, xpose;
MPI_Aint sizeofint;
- int err, errs = 0;
+ int /* err, */ errs = 0;
int bufsize, position = 0;
void *buffer;
change the error handler to errors return */
MPI_Comm_set_errhandler( MPI_COMM_WORLD, MPI_ERRORS_RETURN );
- err = MPI_Pack(a,
+ /* err = */ MPI_Pack(a,
1,
xpose,
buffer,
/* Unpack the buffer into b. */
position = 0;
- err = MPI_Unpack(buffer,
+ /* err = */ MPI_Unpack(buffer,
bufsize,
&position,
b,