Get rid of the dependency on the Unix module

Author: matteo-frigo

genfft/Makefile.am

@@ -19,7 +19,7 @@ gen_hc2cdft.native gen_hc2cdft_c.native gen_hc2hc.native		\
 gen_mdct.native
 
 all-local::
-	$(OCAMLBUILD) -classic-display -libs unix,nums $(GENFFT_NATIVE)
+	$(OCAMLBUILD) -classic-display -libs nums $(GENFFT_NATIVE)
 
 maintainer-clean-local::
 	$(OCAMLBUILD) -classic-display -clean

genfft/util.ml

@@ -21,7 +21,6 @@
 
 (* various utility functions *)
 open List
-open Unix
 
 (*****************************************
  * Integer operations
@@ -134,10 +133,7 @@ let rec suchthat a pred =
 (* print an information message *)
 let info string =
   if !Magic.verbose then begin
-    let now = Unix.times ()
-    and pid = Unix.getpid () in
-    prerr_string ((string_of_int pid) ^ ": " ^
-		  "at t = " ^  (string_of_float now.tms_utime) ^ " : ");
+    prerr_string ("at t = " ^  (string_of_float (Sys.time())) ^ " : ");
     prerr_string (string ^ "\n");
     flush Stdlib.stderr;
   end