summaryrefslogtreecommitdiffstats
path: root/otherlibs/win32unix/read.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/win32unix/read.c')
-rw-r--r--otherlibs/win32unix/read.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/win32unix/read.c b/otherlibs/win32unix/read.c
index cc3fdc441..a45a47ecc 100644
--- a/otherlibs/win32unix/read.c
+++ b/otherlibs/win32unix/read.c
@@ -18,7 +18,7 @@
#include <signals.h>
#include "unixsupport.h"
-value unix_read(value fd, value buf, value ofs, value len) /* ML */
+CAMLprim value unix_read(value fd, value buf, value ofs, value len)
{
DWORD numbytes, numread;
BOOL ret;
@@ -32,7 +32,7 @@ value unix_read(value fd, value buf, value ofs, value len) /* ML */
ret = ReadFile(h, iobuf, numbytes, &numread, NULL);
leave_blocking_section();
if (! ret) {
- _dosmaperr(GetLastError());
+ win32_maperr(GetLastError());
uerror("read", Nothing);
}
memmove (&Byte(buf, Long_val(ofs)), iobuf, numread);