summaryrefslogtreecommitdiffstats
path: root/otherlibs/win32unix/dup.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/win32unix/dup.c')
-rw-r--r--otherlibs/win32unix/dup.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/win32unix/dup.c b/otherlibs/win32unix/dup.c
index 9a00cb762..15d20fd8e 100644
--- a/otherlibs/win32unix/dup.c
+++ b/otherlibs/win32unix/dup.c
@@ -15,13 +15,13 @@
#include <mlvalues.h>
#include "unixsupport.h"
-value unix_dup(value fd) /* ML */
+CAMLprim value unix_dup(value fd)
{
HANDLE newh;
if (! DuplicateHandle(GetCurrentProcess(), Handle_val(fd),
GetCurrentProcess(), &newh,
0L, TRUE, DUPLICATE_SAME_ACCESS)) {
- _dosmaperr(GetLastError());
+ win32_maperr(GetLastError());
return -1;
}
return win_alloc_handle(newh);