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
MPI_Comm_dup_with_info
[simgrid.git]
/
teshsuite
/
smpi
/
mpich3-test
/
comm
/
comm_info.c
diff --git
a/teshsuite/smpi/mpich3-test/comm/comm_info.c
b/teshsuite/smpi/mpich3-test/comm/comm_info.c
index
d2044d4
..
e047c25
100644
(file)
--- a/
teshsuite/smpi/mpich3-test/comm/comm_info.c
+++ b/
teshsuite/smpi/mpich3-test/comm/comm_info.c
@@
-17,7
+17,8
@@
int main(int argc, char **argv)
MPI_Info info_in, info_out;
int errors = 0, all_errors = 0;
MPI_Comm comm;
MPI_Info info_in, info_out;
int errors = 0, all_errors = 0;
MPI_Comm comm;
- char __attribute__((unused)) invalid_key[] = "invalid_test_key";
+ char invalid_key[] = "invalid_test_key";
+ char val[]= "true";
char buf[MPI_MAX_INFO_VAL];
int flag;
char buf[MPI_MAX_INFO_VAL];
int flag;
@@
-26,7
+27,7
@@
int main(int argc, char **argv)
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
MPI_Info_create(&info_in);
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
MPI_Info_create(&info_in);
- MPI_Info_set(info_in, invalid_key,
(char *) "true"
);
+ MPI_Info_set(info_in, invalid_key,
val
);
MPI_Comm_dup(MPI_COMM_WORLD, &comm);
MPI_Comm_dup(MPI_COMM_WORLD, &comm);
@@
-34,7
+35,7
@@
int main(int argc, char **argv)
MPI_Comm_get_info(comm, &info_out);
MPI_Info_get(info_out, invalid_key, MPI_MAX_INFO_VAL, buf, &flag);
MPI_Comm_get_info(comm, &info_out);
MPI_Info_get(info_out, invalid_key, MPI_MAX_INFO_VAL, buf, &flag);
-#if
n
def USE_STRICT_MPI
+#ifdef USE_STRICT_MPI
/* Check if our invalid key was ignored. Note, this check's MPICH's
* behavior, but this behavior may not be required for a standard
* conforming MPI implementation. */
/* Check if our invalid key was ignored. Note, this check's MPICH's
* behavior, but this behavior may not be required for a standard
* conforming MPI implementation. */