BI_BlacsWarn.c File Reference

#include "Bdef.h"

Include dependency graph for BI_BlacsWarn.c:

Go to the source code of this file.

Functions/Subroutines
void	BI_BlacsWarn (int ConTxt, int line, char *file, char *form,...)

---

Function/Subroutine Documentation

void BI_BlacsWarn	(	int	ConTxt,
		int	line,
		char *	file,
		char *	form,
			...
	)

Definition at line 3 of file BI_BlacsWarn.c.

{
   extern int BI_Iam;
   extern BLACSCONTEXT **BI_MyContxts;
   int myrow, mycol;
   va_list argptr;
   char cline[100];

   va_start(argptr, form);
   vsprintf(cline, form, argptr);
   va_end(argptr);

   if (ConTxt > -1)
   {
      myrow = BI_MyContxts[ConTxt]->cscp.Iam;
      mycol = BI_MyContxts[ConTxt]->rscp.Iam;
   }
   else myrow = mycol = -1;

   fprintf(stderr,
"BLACS WARNING '%s'\nfrom {%d,%d}, pnum=%d, Contxt=%d, on line %d of file '%s'.\n\n",
           cline, myrow, mycol, BI_Iam, ConTxt, line, file);
}

Here is the caller graph for this function: