summaryrefslogtreecommitdiffstats
path: root/otherlibs/win32unix/pipe.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/win32unix/pipe.c')
-rw-r--r--otherlibs/win32unix/pipe.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/win32unix/pipe.c b/otherlibs/win32unix/pipe.c
index 160dfeed9..fdcba3418 100644
--- a/otherlibs/win32unix/pipe.c
+++ b/otherlibs/win32unix/pipe.c
@@ -20,7 +20,7 @@
#define SIZEBUF 1024
-value unix_pipe(value unit) /* ML */
+CAMLprim value unix_pipe(value unit)
{
SECURITY_ATTRIBUTES attr;
HANDLE readh, writeh;
@@ -30,7 +30,7 @@ value unix_pipe(value unit) /* ML */
attr.lpSecurityDescriptor = NULL;
attr.bInheritHandle = TRUE;
if (! CreatePipe(&readh, &writeh, &attr, SIZEBUF)) {
- _dosmaperr(GetLastError());
+ win32_maperr(GetLastError());
uerror("pipe", Nothing);
}
Begin_roots2(readfd, writefd)