--- libev/ev_kqueue.c	2007/11/06 00:10:04	1.9
+++ libev/ev_kqueue.c	2007/11/06 00:52:33	1.10
@@ -87,7 +87,7 @@
   if (res < 0)
     { 
       if (errno != EINTR)
-        syserr ();
+        syserr ("(libev) kevent");
 
       return;
     } 
@@ -185,7 +185,16 @@
 static void
 kqueue_fork (EV_P)
 {
-  kqueue_fd = kqueue ();
+  for (;;)
+    {
+      kqueue_fd = kqueue ();
+
+      if (kqueue_fd >= 0)
+        break;
+
+      syserr ("(libev) kqueue");
+    }
+
   fcntl (kqueue_fd, F_SETFD, FD_CLOEXEC);
 
   /* re-register interest in fds */