From bf5113ed1eb16ce6e3be794d3e14da0b9d2222de Mon Sep 17 00:00:00 2001 From: Sapan Bhatia Date: Fri, 29 Feb 2008 19:41:02 +0000 Subject: [PATCH] --- fifowatcher.ml | 2 -- 1 file changed, 2 deletions(-) diff --git a/fifowatcher.ml b/fifowatcher.ml index 6e2a12a..c26295f 100644 --- a/fifowatcher.ml +++ b/fifowatcher.ml @@ -70,7 +70,6 @@ and reopenentry_int fdin fifoin fifoout = @param outdescriptor Name of output pipe, out descriptor *) and receive_fifo_event eventdescriptor outdescriptor = - printf "received fifo event\n";flush Pervasives.stdout; let (evfname,evfd) = eventdescriptor in let (fname_other,fd_other) = outdescriptor in (* Open the output pipe, or use stdout instead *) @@ -87,7 +86,6 @@ and receive_fifo_event eventdescriptor outdescriptor = If not, register it and start a new session.*) let pipe = try Hashtbl.find open_fds evfd with | Not_found -> - printf "fd not found!\n";flush Pervasives.stdout; (* Ok, need to launch script *) let execpath,slice_name = Hashtbl.find fdmap evfd in let (script_infd,pout) = Unix.pipe () in -- 2.43.0