From 6008da0083d1d6cac85e9ba01650435f95c90284 Mon Sep 17 00:00:00 2001 From: tradke Date: Thu, 23 May 2002 15:52:42 +0000 Subject: Bugfix in checking for complex variables. git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGHIO/IOFlexIO/trunk@245 ebee0441-1374-4afa-a3b5-247f3ba15b9a --- src/Output.c | 4 ++-- src/Output2D.c | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/src/Output.c b/src/Output.c index d877f29..ffc0abb 100644 --- a/src/Output.c +++ b/src/Output.c @@ -325,8 +325,8 @@ static void CheckSteerableParameters (const cGH *GH) num_vars = CCTK_NumVars (); for (i = 0; i < num_vars; i++) { - if (myGH->requests[i] && - strncmp (CCTK_VarTypeName (i), "CCTK_VARIABLE_COMPLEX", 21)) + if (myGH->requests[i] && strncmp (CCTK_VarTypeName (CCTK_VarTypeI (i)), + "CCTK_VARIABLE_COMPLEX", 21)) { fullname = CCTK_FullName (i); CCTK_VWarn (1, __LINE__, __FILE__, CCTK_THORNSTRING, diff --git a/src/Output2D.c b/src/Output2D.c index 4d659f6..7da9ac2 100644 --- a/src/Output2D.c +++ b/src/Output2D.c @@ -276,7 +276,7 @@ static void CheckSteerableParameters (flexioGH *myGH) if (strcmp (out2D_vars, myGH->out2D_vars) || myGH->out2D_every_default != i) { num_vars = CCTK_NumVars (); - memset (myGH->out2D_every, 0, num_vars); + memset (myGH->out2D_every, 0, num_vars * sizeof (int)); CCTK_TraverseString (out2D_vars, SetOutputFlag, myGH->out2D_every, CCTK_GROUP_OR_VAR); @@ -285,7 +285,7 @@ static void CheckSteerableParameters (flexioGH *myGH) msg = NULL; for (i = 0; i < num_vars; i++) { - if (myGH->out2D_every[i]) + if (myGH->out2D_every[i] > 0) { fullname = CCTK_FullName (i); if (! msg) -- cgit v1.2.3