From 424b9cf4d40da771f4d7bf346c9b95a7f272c235 Mon Sep 17 00:00:00 2001
From: Xavier Leroy <xavier.leroy@inria.fr>
Date: Mon, 6 Jan 2003 16:44:21 +0000
Subject: Ajout {set,clear}_nonblock.  Cas special Unix.select lorsque les 3
 listes de descripteurs sont vides.  Correction bug traitement d'erreur dans
 Unix.accept.  PR#1499

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5375 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 otherlibs/win32unix/errmsg.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'otherlibs/win32unix/errmsg.c')

diff --git a/otherlibs/win32unix/errmsg.c b/otherlibs/win32unix/errmsg.c
index f1246ab82..20a8c8d58 100644
--- a/otherlibs/win32unix/errmsg.c
+++ b/otherlibs/win32unix/errmsg.c
@@ -13,6 +13,7 @@
 
 /* $Id$ */
 
+#include <stdio.h>
 #include <errno.h>
 #include <string.h>
 #include <mlvalues.h>
@@ -37,6 +38,7 @@ CAMLprim value unix_error_message(value err)
                     sizeof(buffer),
                     NULL))
     return copy_string(buffer);
-  return copy_string("unknown error");
+  sprintf(buffer, "unknown error #%d", errnum);  
+  return copy_string(buffer);
 }
 
-- 
cgit v1.2.3-70-g09d2