A few MinGW tests

configure.ml

@@ -162,11 +162,14 @@ let dir ?def d =
 
 
 let exe = match Sys.os_type with 
+  | "Win32" ->
+      print "Win32 detected... executable will have .exe extension\n"; ".exe" 
   | "Cygwin" ->
-      print "Cygwin detected... executable will have .exe extension"; ".exe" 
+      print "Cygwin detected... executable will have .exe extension\n"; ".exe" 
   | _ -> ""
 
 let check_mliface dir =
+(*  Sys.file_exists (Filename.concat dir "typing/types.ml") *)
   Sys.file_exists (Filename.concat dir "typing/types.ml") 
 
 let ocaml_stdlib () =
@@ -236,10 +239,14 @@ let required_packages = ["camlp4"; "num"; "pcre"; "ulex"; "cgi"; "netstring"]
 
 let has_forpack =
   print "testing for -for-pack option: ";
-  if Sys.command "ocamlc -for-pack foo 2> /dev/null" = 0 then
-    (print "available\n"; true)
-  else
-    (print "not available\n"; false)
+  let comm =
+    match Sys.os_type with
+      | "Win32" -> "ocamlc -for-pack foo"
+      | _ -> "ocamlc -for-pack foo 2> /dev/null" in
+    if Sys.command comm = 0 then
+      (print "available\n"; true)
+    else
+      (print "not available\n"; false)
 
 let has_natdynlink =
   print "testing for native dynlink: ";