From 6ded697b42a2f40a96c774975e36e99897195aec Mon Sep 17 00:00:00 2001
From: Xavier Leroy <xavier.leroy@inria.fr>
Date: Thu, 5 Sep 1996 13:32:25 +0000
Subject: Premiere compilation.

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@956 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 otherlibs/win32unix/windir.c | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'otherlibs/win32unix/windir.c')

diff --git a/otherlibs/win32unix/windir.c b/otherlibs/win32unix/windir.c
index 532cd6643..08f70ed66 100644
--- a/otherlibs/win32unix/windir.c
+++ b/otherlibs/win32unix/windir.c
@@ -13,18 +13,20 @@
 
 #include <mlvalues.h>
 #include <memory.h>
-#include <windows.h>
+#include <errno.h>
 #include <alloc.h>
 #include "unixsupport.h"
 
 value win_findfirst(name)             /* ML */
      value name;
 {
-  HANDLE h;
+  int h;
   value v;
   struct _finddata_t fileinfo;
   Push_roots(r,1);
+
 #define valname r[0] 
+
   h = _findfirst(String_val(name),&fileinfo);
   if (h == -1) {
     if (errno == ENOENT)
-- 
cgit v1.2.3-70-g09d2