--- mpitests-3.2/IMB-3.2/src/IMB_window.c.orig 2013-02-25 15:50:55.000000000 -0500 +++ mpitests-3.2/IMB-3.2/src/IMB_window.c 2013-02-25 15:51:22.000000000 -0500 @@ -140,6 +140,9 @@ Output variables: c_info->rank, 0, 1, c_info->r_data_type, c_info->WIN); MPI_ERRHAND(ierr); } + /* Added a call to MPI_WIN_FENCE, per MPI-2.1 11.2.1 */ + ierr = MPI_Win_fence(0, c_info->WIN); + MPI_ERRHAND(ierr); ierr = MPI_Win_free(&c_info->WIN); MPI_ERRHAND(ierr); }