[svn-r6939] bug fix: the communicator wasn't passed to the err_return...

[svn-r6939] bug fix:  the communicator wasn't passed to the err_return function, so we weren't checking whether to return errors or abort

src/mpi/attr/comm_set_attr.c

@@ -173,6 +173,7 @@ corresponding keyval was created) will be called.
 int MPI_Comm_set_attr(MPI_Comm comm, int comm_keyval, void *attribute_val)
 {
     int mpi_errno = MPI_SUCCESS;
+    MPID_Comm *comm_ptr;
     MPID_MPI_STATE_DECL(MPID_STATE_MPI_COMM_SET_ATTR);
 
     MPID_MPI_FUNC_ENTER(MPID_STATE_MPI_COMM_SET_ATTR);
@@ -194,7 +195,8 @@ int MPI_Comm_set_attr(MPI_Comm comm, int comm_keyval, void *attribute_val)
 	    "**mpi_comm_set_attr %C %d %p", comm, comm_keyval, attribute_val);
     }
 #   endif
-    mpi_errno = MPIR_Err_return_comm( NULL, FCNAME, mpi_errno );
+    MPID_Comm_get_ptr( comm, comm_ptr );
+    mpi_errno = MPIR_Err_return_comm( comm_ptr, FCNAME, mpi_errno );
     goto fn_exit;
     /* --END ERROR HANDLING-- */
 }