[svn-r10681] RMA Req-ops: Fixed PROC_NULL handling

When called with a target process of PROC_NULL, RMA request-generating
operations did not return a valid request handle.

Reviewer: goodell

src/mpi/rma/raccumulate.c

@@ -153,8 +153,6 @@ int MPI_Raccumulate(const void *origin_addr, int origin_count, MPI_Datatype
 
     /* ... body of routine ...  */
     
-    if (target_rank == MPI_PROC_NULL) goto fn_exit;
-
     mpi_errno = MPIU_RMA_CALL(win_ptr,Raccumulate(origin_addr, origin_count, 
                                          origin_datatype,
                                          target_rank, target_disp, target_count,

src/mpi/rma/rget.c

@@ -147,8 +147,6 @@ int MPI_Rget(void *origin_addr, int origin_count, MPI_Datatype
 
     /* ... body of routine ...  */
     
-    if (target_rank == MPI_PROC_NULL) goto fn_exit;
-
     mpi_errno = MPIU_RMA_CALL(win_ptr,
                               Rget(origin_addr, origin_count, origin_datatype,
                                   target_rank, target_disp, target_count,

src/mpi/rma/rget_accumulate.c

@@ -179,8 +179,6 @@ int MPI_Rget_accumulate(const void *origin_addr, int origin_count,
 
     /* ... body of routine ...  */
     
-    if (target_rank == MPI_PROC_NULL) goto fn_exit;
-
     mpi_errno = MPIU_RMA_CALL(win_ptr,Rget_accumulate(origin_addr, origin_count, 
                                          origin_datatype,
                                          result_addr, result_count,

src/mpi/rma/rput.c

@@ -149,8 +149,6 @@ int MPI_Rput(const void *origin_addr, int origin_count, MPI_Datatype
 
     /* ... body of routine ...  */
     
-    if (target_rank == MPI_PROC_NULL) goto fn_exit;
-
     mpi_errno = MPIU_RMA_CALL(win_ptr,
                               Rput(origin_addr, origin_count, origin_datatype,
                                   target_rank, target_disp, target_count,

src/mpid/ch3/src/ch3u_rma_reqops.c

@@ -33,7 +33,9 @@ static int MPIDI_CH3I_Rma_req_poll(void *state, MPI_Status *status)
     /* If this is a local operation, it's already complete.  Otherwise, call
      * flush to complete the operation */
     /* FIXME: We still may need to flush or sync for shared memory windows */
-    if (req_state->target_rank != req_state->win_ptr->comm_ptr->rank) {
+    if (req_state->target_rank != req_state->win_ptr->comm_ptr->rank &&
+        req_state->target_rank != MPI_PROC_NULL)
+    {
         mpi_errno = req_state->win_ptr->RMAFns.Win_flush(req_state->target_rank,
                                                          req_state->win_ptr);