SCALAPACK 2.2.2
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches

◆ BI_Asend()

void BI_Asend ( BLACSCONTEXT ctxt,
Int  dest,
Int  msgid,
BLACBUFF bp 
)

Definition at line 3 of file BI_Asend.c.

4{
5 Int i, info;
6 MpiInt errclass;
7
8 info=MPI_Isend(bp->Buff, bp->N, bp->dtype, dest, msgid, ctxt->scp->comm,
9 &bp->Aops[bp->nAops]);
10 while(info != MPI_SUCCESS)
11 {
12 i=MPI_Error_class(info, &errclass);
13 if ( (errclass != MPI_ERR_UNKNOWN) && (errclass != MPI_ERR_OTHER) &&
14 (errclass != MPI_ERR_INTERN) )
15 {
16 Mmpierror(info, "MPI_Isend", ctxt, __LINE__, __FILE__);
17 BI_BlacsErr(BI_ContxtNum(ctxt), __LINE__, __FILE__,
18 "MPI error %d on call to MPI_Isend", info);
19 }
20#if (BlacsDebugLvl > 0)
21 else BI_BlacsWarn(BI_ContxtNum(ctxt), __LINE__, __FILE__,
22"MPI error %d assumed to mean out of non-blocking resources on call to MPI_Isend",
23 info);
24#endif
25 info=MPI_Isend(bp->Buff, bp->N, bp->dtype, dest, msgid, ctxt->scp->comm,
26 &bp->Aops[bp->nAops]);
27 }
28 bp->nAops++;
29}
#define Int
Definition Bconfig.h:22
#define MpiInt
Definition Bconfig.h:25
void BI_BlacsErr(Int ConTxt, Int line, char *file, char *form,...)
Definition BI_BlacsErr.c:3
#define Mmpierror(ierr, rout, ctxt, line, file)
Definition Bdef.h:217
Int BI_ContxtNum(BLACSCONTEXT *ctxt)
Definition BI_ContxtNum.c:3
void BI_BlacsWarn(Int ConTxt, Int line, char *file, char *form,...)
Definition BI_BlacsWarn.c:3
Int N
Definition Bdef.h:61
MPI_Request * Aops
Definition Bdef.h:59
MPI_Datatype dtype
Definition Bdef.h:60
Int nAops
Definition Bdef.h:58
char * Buff
Definition Bdef.h:56
BLACSSCOPE * scp
Definition Bdef.h:26
MPI_Comm comm
Definition Bdef.h:15
Here is the call graph for this function:
Here is the caller graph for this function: