A
lgorithmique
N
umérique
D
istribuée
Public GIT Repository
projects
/
simgrid.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Initialize common variable.
[simgrid.git]
/
teshsuite
/
smpi
/
alltoall_basic.c
diff --git
a/teshsuite/smpi/alltoall_basic.c
b/teshsuite/smpi/alltoall_basic.c
index
ad25e7a
..
c3af311
100644
(file)
--- a/
teshsuite/smpi/alltoall_basic.c
+++ b/
teshsuite/smpi/alltoall_basic.c
@@
-1,4
+1,4
@@
-/* Copyright (c) 2009
, 2010
. The SimGrid Team.
+/* Copyright (c) 2009
-2010, 2012-2013
. The SimGrid Team.
* All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
* All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
@@
-32,6
+32,7
@@
int main(int argc, char *argv[])
perror("can't allocate send buffer");
fflush(stderr);
MPI_Abort(MPI_COMM_WORLD, EXIT_FAILURE);
perror("can't allocate send buffer");
fflush(stderr);
MPI_Abort(MPI_COMM_WORLD, EXIT_FAILURE);
+ exit(EXIT_FAILURE);
}
rb = (int *) malloc(size * sizeof(int));
if (!rb) {
}
rb = (int *) malloc(size * sizeof(int));
if (!rb) {
@@
-39,11
+40,13
@@
int main(int argc, char *argv[])
fflush(stderr);
free(sb);
MPI_Abort(MPI_COMM_WORLD, EXIT_FAILURE);
fflush(stderr);
free(sb);
MPI_Abort(MPI_COMM_WORLD, EXIT_FAILURE);
+ exit(EXIT_FAILURE);
}
for (i = 0; i < size; ++i) {
sb[i] = rank + 1;
rb[i] = 0;
}
}
for (i = 0; i < size; ++i) {
sb[i] = rank + 1;
rb[i] = 0;
}
+
status = MPI_Alltoall(sb, 1, MPI_INT, rb, 1, MPI_INT, MPI_COMM_WORLD);
printf("[%d] rcvbuf=[", rank);
status = MPI_Alltoall(sb, 1, MPI_INT, rb, 1, MPI_INT, MPI_COMM_WORLD);
printf("[%d] rcvbuf=[", rank);
@@
-53,7
+56,7
@@
int main(int argc, char *argv[])
if (rank == 0) {
if (rank == 0) {
- if (status !=
0
) {
+ if (status !=
MPI_SUCCESS
) {
printf("all_to_all returned %d\n", status);
fflush(stdout);
}
printf("all_to_all returned %d\n", status);
fflush(stdout);
}