summaryrefslogtreecommitdiffstats
path: root/otherlibs/win32unix/channels.c
diff options
context:
space:
mode:
authorDamien Doligez <damien.doligez-inria.fr>2011-07-20 09:17:07 +0000
committerDamien Doligez <damien.doligez-inria.fr>2011-07-20 09:17:07 +0000
commitc91db736b18c7ed0ec81596b76874f5423d5d331 (patch)
treea967edfcd254aa6844c44e81ea33596a82b7bf87 /otherlibs/win32unix/channels.c
parent46d5420ca9c695738f7a0baa527d3591d95f067a (diff)
merge changes from 3.12.0 to 3.12.1
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@11123 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/win32unix/channels.c')
-rw-r--r--otherlibs/win32unix/channels.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/otherlibs/win32unix/channels.c b/otherlibs/win32unix/channels.c
index 1c2cd2734..56a19c7dc 100644
--- a/otherlibs/win32unix/channels.c
+++ b/otherlibs/win32unix/channels.c
@@ -30,6 +30,7 @@ int win_CRT_fd_of_filedescr(value handle)
} else {
int fd = _open_osfhandle((long) Handle_val(handle), O_BINARY);
if (fd == -1) uerror("channel_of_descr", Nothing);
+ CRT_fd_val(handle) = fd;
return fd;
}
}