コード例 #1
0
ファイル: visual_mess.c プロジェクト: pkestene/mpe
int  MPI_Ibsend(MPE_CONST void *buf, int count, MPI_Datatype datatype,
		int dest, int tag, MPI_Comm comm, MPI_Request *request)
{
  int  returnVal;
  request_list *newrq;
  int typesize3;

  
  
/* fprintf( stderr, "MPI_Ibsend call on %d\n", procid_1 ); */
  
  returnVal = PMPI_Ibsend( buf, count, datatype, dest, tag, comm, request );

  if (dest != MPI_PROC_NULL) {
      rq_alloc( requests_avail_1, newrq );
    if (newrq) {
      PMPI_Type_size( datatype, &typesize3 );
      newrq->request = *request;
      newrq->status = RQ_SEND;
      newrq->size = count * typesize3;
      newrq->tag = tag;
      newrq->otherParty = dest;
      newrq->next = 0;
      rq_add( requests_head_1, requests_tail_1, newrq );
    }
  }

  return returnVal;
}
コード例 #2
0
ファイル: smpi_mpi.c プロジェクト: FlorianPO/simgrid
int MPI_Ibsend(void* buf, int count, MPI_Datatype datatype, int dest, int tag, MPI_Comm comm, MPI_Request* request) {
  return PMPI_Ibsend(buf, count, datatype, dest, tag, comm, request);
}
コード例 #3
0
ファイル: MPI_Ibsend.c プロジェクト: 00liujj/trilinos
/*=============================================================================================*/
int MPI_Ibsend (void* message, int count, MPI_Datatype datatype, int dest,
        int tag, MPI_Comm comm, MPI_Request* request)
{
  _MPI_COVERAGE();
  return PMPI_Ibsend(message, count, datatype, dest, tag, comm, request);
}