- MPI_Win_allocate(NSTEPS*N*sizeof(double), sizeof(double), MPI_INFO_NULL,
+ MPI_Info_create(&win_info);
+
+#ifdef USE_WIN_ALLOC_SHM
+ MPI_Info_set(win_info, "alloc_shm", "true");
+#else
+ MPI_Info_set(win_info, "alloc_shm", "false");
+#endif
+
+ MPI_Win_allocate(NSTEPS*N*sizeof(double), sizeof(double), win_info,