From 61d472efde52e15b47d8c65d4689432d88f59a85 Mon Sep 17 00:00:00 2001 From: Siraaj Khandkar Date: Mon, 26 Nov 2018 20:39:50 -0500 Subject: [PATCH] Remove debug statements --- dups.ml | 2 -- 1 file changed, 2 deletions(-) diff --git a/dups.ml b/dups.ml index 6628d99..e340a78 100644 --- a/dups.ml +++ b/dups.ml @@ -283,7 +283,6 @@ end = struct end let lord t ~njobs ~vassals ~ic ~ocs = - eprintf "[debug] [lord] started\n%!"; let active_vassals = ref njobs in let results = Queue.create () in let rec dispatch () = @@ -316,7 +315,6 @@ end = struct of_queue results let vassal i ~f ~vassal_pipe_r ~lord_pipe_w = - eprintf "[debug] [vassal %d] started\n%!" i; let ic = Unix.in_channel_of_descr vassal_pipe_r in let oc = Unix.out_channel_of_descr lord_pipe_w in let rec work msg = -- 2.20.1