From a17a72443273b6a7f7ef42e71ebccc587e949162 Mon Sep 17 00:00:00 2001 From: tradke Date: Thu, 3 May 2001 15:36:21 +0000 Subject: Bugfix for getting the group index. git-svn-id: http://svn.cactuscode.org/arrangements/CactusUtils/NaNChecker/trunk@5 ff385933-4943-42dc-877b-ffc776028de6 --- src/NaNCheck.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/NaNCheck.c b/src/NaNCheck.c index 988b2c7..eb64862 100644 --- a/src/NaNCheck.c +++ b/src/NaNCheck.c @@ -307,7 +307,7 @@ static void NaNCheck (int vindex, const char *optstring, void *_GH) if (fp_type) { - gindex = CCTK_GroupTypeFromVarI (vindex); + gindex = CCTK_GroupIndexFromVarI (vindex); /* check if variable has storage assigned */ if (CCTK_QueryGroupStorageI (GH, gindex)) @@ -315,7 +315,7 @@ static void NaNCheck (int vindex, const char *optstring, void *_GH) /* get the number of elements to check for this variable */ nelems = 1; gdata.dim = 0; - if (CCTK_GroupTypeFromVarI (vindex) != CCTK_SCALAR) + if (CCTK_GroupTypeI (vindex) != CCTK_SCALAR) { CCTK_GroupDynamicData (GH, gindex, &gdata); for (i = 0; i < gdata.dim; i++) @@ -334,7 +334,7 @@ static void NaNCheck (int vindex, const char *optstring, void *_GH) data = CCTK_VarDataPtrI (GH, CCTK_NumTimeLevelsFromVarI(vindex)-1,vindex); /* do the checking according to the variable's type */ - if (vtype == CCTK_VARIABLE_REAL || CCTK_VARIABLE_COMPLEX) + if (vtype == CCTK_VARIABLE_REAL || CCTK_VARIABLE_COMPLEX) { CHECK_DATA (CCTK_REAL); } -- cgit v1.2.3