Fix eio_windows

Author: patricoferris

lib_eio_windows/dune

@@ -2,7 +2,7 @@
  (name eio_windows)
  (public_name eio_windows)
  (library_flags :standard -cclib -lbcrypt -cclib -lntdll)
- (enabled_if (= %{os_type} "Win32"))
+; (enabled_if (= %{os_type} "Win32"))
  (foreign_stubs
   (language c)
   (include_dirs ../lib_eio/unix/include)

lib_eio_windows/low_level.ml

@@ -140,7 +140,9 @@ let read_link ?dirfd path =
 
 let chown ?dirfd ~follow:_ ~uid ~gid path =
   in_worker_thread @@ fun () ->
-  Eio_unix.Private.chown ~flags:0 ~uid ~gid dirfd path
+  match dirfd with
+  | None -> failwith "Chown is unsupported on Windows"
+  | Some dirfd -> Eio_unix.Private.chown ~flags:0 ~uid ~gid dirfd path
 
 external eio_readv : Unix.file_descr -> Cstruct.t array -> int = "caml_eio_windows_readv"