diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 2011-12-21 16:31:01 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 2011-12-21 16:31:01 +0000 |
| commit | ac0aa0778d1c2fde73d4f1e9f82c609290eb7955 (patch) | |
| tree | 9755b832537ced847fd668063c935256e21c67a6 /otherlibs | |
| parent | 253e88bc67dc630a7a5dcbccb3346b5c02cd3e58 (diff) | |
| download | ocaml-ac0aa0778d1c2fde73d4f1e9f82c609290eb7955.tar.gz | |
PR#5179: giant steps towards a Mingw64 port.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@11927 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs')
| -rw-r--r-- | otherlibs/num/Makefile.nt | 2 | ||||
| -rw-r--r-- | otherlibs/win32unix/channels.c | 6 |
2 files changed, 4 insertions, 4 deletions
diff --git a/otherlibs/num/Makefile.nt b/otherlibs/num/Makefile.nt index 9d831657af..4ac69c7cad 100644 --- a/otherlibs/num/Makefile.nt +++ b/otherlibs/num/Makefile.nt @@ -28,7 +28,7 @@ clean:: rm -f *~ bng.$(O): bng.h bng_digit.c \ - bng_alpha.c bng_amd64.c bng_ia32.c bng_mips.c bng_ppc.c bng_sparc.c + bng_amd64.c bng_ia32.c bng_ppc.c bng_sparc.c depend: sed -e 's/\.o/.$(O)/g' .depend > .depend.nt diff --git a/otherlibs/win32unix/channels.c b/otherlibs/win32unix/channels.c index 2a3774d90e..ea3912720d 100644 --- a/otherlibs/win32unix/channels.c +++ b/otherlibs/win32unix/channels.c @@ -20,15 +20,15 @@ #include "unixsupport.h" #include <fcntl.h> -extern long _get_osfhandle(int); -extern int _open_osfhandle(long, int); +extern intptr_t _get_osfhandle(int); +extern int _open_osfhandle(intptr_t, int); int win_CRT_fd_of_filedescr(value handle) { if (CRT_fd_val(handle) != NO_CRT_FD) { return CRT_fd_val(handle); } else { - int fd = _open_osfhandle((long) Handle_val(handle), O_BINARY); + int fd = _open_osfhandle((intptr_t) Handle_val(handle), O_BINARY); if (fd == -1) uerror("channel_of_descr", Nothing); CRT_fd_val(handle) = fd; return fd; |