diff options
author | tradke <tradke@b589c3ab-70e8-4b4d-a09f-cba2dd200880> | 2001-09-05 08:37:57 +0000 |
---|---|---|
committer | tradke <tradke@b589c3ab-70e8-4b4d-a09f-cba2dd200880> | 2001-09-05 08:37:57 +0000 |
commit | 0bb0f59eb8307dcf85a2b75c06e6871bab8d9738 (patch) | |
tree | 10f077e8f16069b1f6e729ae826f126774fe9f78 /src/OutputScalar.c | |
parent | bb8612ae0c144ec379e06f6ec52f27f6a2f134a7 (diff) |
Reduced number of info messages by putting all into one using Util_asprintf().
This closes PR CactusBase-IOASCII 777.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/IOBasic/trunk@101 b589c3ab-70e8-4b4d-a09f-cba2dd200880
Diffstat (limited to 'src/OutputScalar.c')
-rw-r--r-- | src/OutputScalar.c | 34 |
1 files changed, 25 insertions, 9 deletions
diff --git a/src/OutputScalar.c b/src/OutputScalar.c index ed9c149..6e23774 100644 --- a/src/OutputScalar.c +++ b/src/OutputScalar.c @@ -15,6 +15,7 @@ #include "cctk.h" #include "cctk_Parameters.h" +#include "util_String.h" #include "iobasicGH.h" static const char *rcsid = "$Header$"; @@ -288,9 +289,9 @@ int IOBasic_TriggerScalarOutput (cGH *GH, int vindex) static void CheckSteerableParameters (iobasicGH *myGH) { DECLARE_CCTK_PARAMETERS - int out_old; + int i, num_vars, out_old; int times_set; - int i; + char *fullname, *msg; static int outScalar_vars_lastset = -1; @@ -316,20 +317,35 @@ static void CheckSteerableParameters (iobasicGH *myGH) times_set = CCTK_ParameterQueryTimesSet ("outScalar_vars", CCTK_THORNSTRING); if (times_set != outScalar_vars_lastset) { - memset (myGH->do_outScalar, 0, CCTK_NumVars ()); + num_vars = CCTK_NumVars (); + memset (myGH->do_outScalar, 0, num_vars); CCTK_TraverseString (outScalar_vars, SetOutputFlag, myGH->do_outScalar, CCTK_GROUP_OR_VAR); if (CCTK_Equals (newverbose, "standard") || CCTK_Equals (newverbose, "full")) { - for (i=0;i<CCTK_NumVars();i++) + msg = NULL; + for (i = 0; i < num_vars; i++) { - if (myGH->do_outScalar[i]) - { - CCTK_VInfo (CCTK_THORNSTRING, - "Scalar: Output requested for %s",CCTK_FullName(i)); - } + if (myGH->do_outScalar[i]) + { + fullname = CCTK_FullName (i); + if (! msg) + { + Util_asprintf (&msg, "Scalar: Output requested for %s", fullname); + } + else + { + Util_asprintf (&msg, "%s %s", msg, fullname); + } + free (fullname); + } + } + if (msg) + { + CCTK_INFO (msg); + free (msg); } } |