cffi-posix/cffi-kqueue

diff --git a/cffi-epoll.lisp b/cffi-epoll.lisp
index 4f8fba7..0a30696 100644
--- a/cffi-epoll.lisp
+++ b/cffi-epoll.lisp
@@ -12,7 +12,7 @@
 
 (defmacro with ((fdvar &optional (size 10)) &body body)
   (let ((fd (gensym "FD-")))
-    `(let ((,fd (epoll-create ,size)))
+    `(let ((,fd (create ,size)))
        (unwind-protect (let ((,fdvar ,fd)) ,@body)
 	 (unistd:close ,fd)))))