+
+ /* Test#4: getting other info keys */
+
+ MPI_Win_get_info(win, &info_out);
+
+ MPI_Info_get(info_out, (char *)"accumulate_ordering", MPI_MAX_INFO_VAL, buf, &flag);
+ if (flag && VERBOSE)
+ printf("%d: accumulate_ordering = %s\n", rank, buf);
+
+ MPI_Info_get(info_out, (char *)"accumulate_ops", MPI_MAX_INFO_VAL, buf, &flag);
+ if (flag && VERBOSE)
+ printf("%d: accumulate_ops = %s\n", rank, buf);
+
+ MPI_Info_get(info_out, (char *)"same_size", MPI_MAX_INFO_VAL, buf, &flag);
+ if (flag && VERBOSE)
+ printf("%d: same_size = %s\n", rank, buf);
+
+ MPI_Info_get(info_out, (char *)"alloc_shm", MPI_MAX_INFO_VAL, buf, &flag);
+ if (flag && VERBOSE)
+ printf("%d: alloc_shm = %s\n", rank, buf);
+
+ MPI_Info_free(&info_out);