Minor fix for checkpointing.
authorPeter Kasson <kasson@Macintosh-69.local>
Thu, 17 Dec 2009 00:15:43 +0000 (16:15 -0800)
committerPeter Kasson <kasson@Macintosh-69.local>
Thu, 17 Dec 2009 00:15:43 +0000 (16:15 -0800)
src/gmxlib/checkpoint.c

index ebd41c57191c524f478327bb255d83837a7c9488..60ba8264345f2fcf0733c40a6c4f2fb51db16e98 100644 (file)
@@ -1106,6 +1106,7 @@ void write_checkpoint(const char *fn,FILE *fplog,t_commrec *cr,
        sfree(outputfiles);
        #ifdef GMX_FAHCORE
     /*code for alternate checkpointing scheme.  moved from top of loop over steps */
+      fcRequestCheckPoint();
       if ( fcCheckPointParallel( cr->nodeid, NULL,0) == 0 ) {
         gmx_fatal( 3,__FILE__,__LINE__, "Checkpoint error on step %d\n", step );
       }