[r2004-04-20 22:45:14 by afrisch] Empty log message

Original author: afrisch
Date: 2004-04-20 22:45:14+00:00

configure.ml

@@ -121,7 +121,10 @@ let dir ?def d =
 let native = 
   check_feature "ocamlopt" 
     (fun () -> Sys.command "ocamlfind ocamlopt 2> /dev/null" = 0)
-let ml_interface = check_feature "mliface" (fun () -> Sys.file_exists "oCaml_all.cma")
+let ml_interface = 
+  check_feature "mliface" 
+    (fun () -> 
+       Sys.command "ocamlfind ocamlc -o /dev/null oCaml_all.cma 2> /dev/null" = 0)
 let expat = check_feature "expat" (check_pkg "expat")
 let curl = check_feature "curl" (check_pkg "curl")
 let netclient = check_feature "curl" (check_pkg "curl")