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;
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_get_info(comm, &info_out);
MPI_Info_get(info_out, invalid_key, MPI_MAX_INFO_VAL, buf, &flag);
-#ifndef 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. */