Reactivated the termination checkpoint routine.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGHIO/IOHDF5/trunk@21 4825ed28-b72c-4eae-9704-e50c059e567d

1 files changed, 10 insertions, 16 deletions

diff --git a/src/DumpGH.c b/src/DumpGH.c
index 803bb8f..f3211d0 100644
--- a/src/DumpGH.c
+++ b/src/DumpGH.c
@@ -80,32 +80,26 @@ void IOHDF5_ConditionallyDumpGH (cGH *GH)
    @date       Fri Aug 21 14:40:21 1998
    @author     Gabrielle Allen
    @desc 
-     This routine is registered as CCTK_TERMINATE, it checks if a
-     termination signal is raised (that is: global var cactus_terminate
-     set to TERMINATION_RAISED_BRDCAST) and checkpoints all available 
-     grid hierarchies.
+               This routine is registered as CCTK_TERMINATE
+               and does a checkpoint if the parameter
+               'IO::checkpoint_on_terminate' was set.
    @enddesc 
    @calledby   CCTK Scheduler
-   @history 
- 
-   @endhistory 
    @var        GH
    @vdesc      Pointer to CCTK grid hierarchy
    @vtype      cGH
    @vio        in
    @endvar
 @@*/
-
 void IOHDF5_TerminationDumpGH (cGH *GH)
 {
-/*** FIXME: no cactus_terminate flag anymore ? ***/
-#if 0
-  if (cactus_terminate == TERMINATION_RAISED_BRDCAST) {
-    IOHDF5_DumpGH (GH, CP_EVOLUTION_DATA); 
+  DECLARE_CCTK_PARAMETERS
+
+
+  if (checkpoint && checkpoint_on_terminate)
+  {
+    IOHDF5_DumpGH (GH, CP_EVOLUTION_DATA);
   }
-#else
-  CCTK_WARN (1, "IOHDF5_TerminationDumpGH() not yet implemented !");
-#endif
 }
 
  /*@@
@@ -237,7 +231,7 @@ void IOHDF5i_DumpGHExtensions (cGH *GH, hid_t group)
   int attrValue, main_loop_index;
   ioGH *ioUtilGH;
   ioHDF5GH *myGH;
-  extern int CCTK_MainLoopIndex (void);
+
 
   /* Get the handles for IOUtil and IOHDF5 extensions */
   ioUtilGH = (ioGH *) GH->extensions [CCTK_GHExtensionHandle ("IO")];