diff options
author | tradke <tradke@7842ec3a-9562-4be5-9c5b-06ba18f2b668> | 2003-07-14 08:24:57 +0000 |
---|---|---|
committer | tradke <tradke@7842ec3a-9562-4be5-9c5b-06ba18f2b668> | 2003-07-14 08:24:57 +0000 |
commit | 438d5b8eef1217272d7f6328582b2331a4ea65bd (patch) | |
tree | 4f704745a1aa6ff35b18c68fff31fd27185899a0 | |
parent | e0f7b5015570b820f9fb4e713ca77e74b2136e2f (diff) |
Checkpoint active timelevels only. This closes PR BetaThorns/1564.
Currently the number of active timelevels is determined by calling
PUGH_NumTimeLevels() because there is no such flesh counterpart.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGHIO/IOHDF5Util/trunk@91 7842ec3a-9562-4be5-9c5b-06ba18f2b668
-rw-r--r-- | src/DumpUtils.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/DumpUtils.c b/src/DumpUtils.c index d37d9d8..fc1ee9f 100644 --- a/src/DumpUtils.c +++ b/src/DumpUtils.c @@ -17,6 +17,7 @@ #include "CactusBase/IOUtil/src/ioGH.h" #include "CactusBase/IOUtil/src/ioutil_CheckpointRecovery.h" #include "ioHDF5UtilGH.h" +#include "CactusPUGH/PUGH/src/include/pugh.h" /* the rcs ID and its dummy function to use it */ static const char *rcsid = "$Header$"; @@ -59,6 +60,7 @@ int IOHDF5Util_DumpGH (const cGH *GH, const int *timers, hid_t file) cGroup gdata; char *fullname; ioRequest *request; + const pGH *pughGH; DECLARE_CCTK_PARAMETERS @@ -93,6 +95,8 @@ int IOHDF5Util_DumpGH (const cGH *GH, const int *timers, hid_t file) CCTK_TimerStartI (timers[CP_VARIABLES_TIMER]); } + pughGH = PUGH_pGH (GH); + /* ... now the variables, sorted by groups */ for (gindex = CCTK_NumGroups () - 1; gindex >= 0; gindex--) { @@ -130,7 +134,7 @@ int IOHDF5Util_DumpGH (const cGH *GH, const int *timers, hid_t file) { /* loop over all allocated timelevels of this variable */ for (request->timelevel = 0; - request->timelevel < gdata.numtimelevels; + request->timelevel < PUGH_NumTimeLevels (pughGH, request->vindex)-1; request->timelevel++) { if (CCTK_Equals (verbose, "full") && file >= 0) |