From 7883be32c1d655c5c2cd369aa7ad0bc6954da2c2 Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Thu, 12 Oct 2017 17:59:08 +0200
Subject: [PATCH] Removed ZMQ unbind

---
 ocaml/Qmcchem_dataserver.ml | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/ocaml/Qmcchem_dataserver.ml b/ocaml/Qmcchem_dataserver.ml
index 6386771..3067996 100644
--- a/ocaml/Qmcchem_dataserver.ml
+++ b/ocaml/Qmcchem_dataserver.ml
@@ -98,8 +98,7 @@ let run ?(daemon=true) ezfio_filename =
         let result = 
           try
             ZMQ.Socket.bind socket address;
-            ZMQ.Socket.unbind socket address; 
-            accu;
+            accu
           with
           | _ -> false;
         in