BI_ContxtNum()

Int BI_ContxtNum

(

BLACSCONTEXT *

ctxt

)

Definition at line 3 of file BI_ContxtNum.c.

{
   Int i;
   extern Int BI_MaxNCtxt;
   extern BLACSCONTEXT **BI_MyContxts;
 
   if (ctxt == NULL) return(-1);
   for (i=0; i < BI_MaxNCtxt; i++) if (BI_MyContxts[i] == ctxt) break;
   if (i == BI_MaxNCtxt)
      BI_BlacsErr(-1, -1, "BLACS INTERNAL ROUTINE", "illegal context");
   return(i);
}

Here is the call graph for this function:

Here is the caller graph for this function: