diff options
| -rw-r--r-- | src/RecoverGH.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/RecoverGH.c b/src/RecoverGH.c index e80f6ab..4ceb67c 100644 --- a/src/RecoverGH.c +++ b/src/RecoverGH.c @@ -180,11 +180,13 @@ int IOHDF5_Recover (cGH *GH, const char *basefilename, int called_from) if (CCTK_Equals (verbose, "full")) { CCTK_VInfo (CCTK_THORNSTRING, "Old checkpoint file '%s' will be removed" - " after next successful checkpoint", + " after next IO::checkpoint_keep " + "successful checkpoints", fileinfo.filename); } myGH->cp_filename_list[myGH->cp_filename_index] = strdup (fileinfo.filename); + myGH->cp_filename_index = (myGH->cp_filename_index+1) % checkpoint_keep; } } |