summaryrefslogtreecommitdiffstats
path: root/otherlibs/win32unix/dup2.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/win32unix/dup2.c')
-rw-r--r--otherlibs/win32unix/dup2.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/otherlibs/win32unix/dup2.c b/otherlibs/win32unix/dup2.c
index 0567bdfcf..3f6d37e76 100644
--- a/otherlibs/win32unix/dup2.c
+++ b/otherlibs/win32unix/dup2.c
@@ -37,7 +37,6 @@ CAMLprim value unix_dup2(value fd1, value fd2)
Descr_kind_val(fd2) = Descr_kind_val(fd1);
/* Reflect the dup2 on the CRT fds, if any */
if (CRT_fd_val(fd1) != NO_CRT_FD || CRT_fd_val(fd2) != NO_CRT_FD)
- _dup2(Int_val(win_CRT_fd_of_filedescr(fd1)),
- Int_val(win_CRT_fd_of_filedescr(fd2)));
+ _dup2(win_CRT_fd_of_filedescr(fd1), win_CRT_fd_of_filedescr(fd2));
return Val_unit;
}