diff --git a/ocaml/Qmcchem_dataserver.ml b/ocaml/Qmcchem_dataserver.ml
index 08c9e39..2d79c3e 100644
--- a/ocaml/Qmcchem_dataserver.ml
+++ b/ocaml/Qmcchem_dataserver.ml
@@ -242,6 +242,7 @@ let run ?(daemon=true) ezfio_filename =
         last_save_walkers := t0 ;
       end
   in
+  save_walkers ();
 
 
 
@@ -772,7 +773,6 @@ let run ?(daemon=true) ezfio_filename =
         in handle msg
       in
 
-      save_walkers ();
       (* Main loop *)
       while (!status <> Status.Stopped)
       do