ForkMaster/netgen
1
0
Fork 0
mirror of https://github.com/NGSolve/netgen.git synced 2025-01-28 22:00:33 +05:00
Code Issues Packages Projects Releases Wiki Activity

parallel output

Browse Source
This commit is contained in:
Joachim Schoeberl 2012-09-03 09:50:08 +00:00
parent 20ff8f9869
commit 910b336d7b
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ng/ngpkg.cpp
View File

@ -146,10 +146,15 @@ namespace netgen
#endif #endif
*/ */
if (id == 0)
(*mycout) << s << flush;
/*
if ( ntasks == 1 ) if ( ntasks == 1 )
(*mycout) << s << flush; (*mycout) << s << flush;
else else
(*mycout) << "p" << id << ": " << s << flush ; (*mycout) << "p" << id << ": " << s << flush ;
*/
} }
DLL_HEADER void MyError(const char * ch) DLL_HEADER void MyError(const char * ch)

5
nglib/nglib.cpp
View File

@ -1180,9 +1180,12 @@ namespace netgen
//Destination for messages, errors, ... //Destination for messages, errors, ...
DLL_HEADER void Ng_PrintDest(const char * s) DLL_HEADER void Ng_PrintDest(const char * s)
{ {
#ifdef PARALLEL
int id = 0; int id = 0;
MPI_Comm_rank(MPI_COMM_WORLD, &id); MPI_Comm_rank(MPI_COMM_WORLD, &id);
if (id == 0) (*mycout) << s << flush; if (id != 0) return;
#endif PARALLEL
(*mycout) << s << flush;
} }