cffi-posix/cffi-epoll

diff --git a/cffi-epoll.lisp b/cffi-epoll.lisp
index 20137ca..6994419 100644
--- a/cffi-epoll.lisp
+++ b/cffi-epoll.lisp
@@ -78,7 +78,7 @@
 
 (defmacro wait ((events-var fd-var epfd &optional
                             (max-events 1024)
-                            (timeout -1))
+                            (timeout 60000))
                 &body body)
   (let ((events (gensym "EVENTS-"))
         (evt (gensym "EVT-"))