[Openmcl-devel] EPoll Bindings for CCL
Daniel Weinreb
dlw at itasoftware.com
Mon Sep 28 08:52:55 PDT 2009
I tried cliki.net/epoll and got "oops, this link appears
to be broken". There is a copy of the page in the Google
cache as of 23 Sept 2009. (I'll send you a copy of this
just in case you need it, before it leaves the cache.
Just to be on the safe side.)
-- Dan
Volkan YAZICI wrote:
> Hi,
>
> I've released the first draft of my EPoll package[1][2]. While
> everything works for SBCL, `EPFD-WAIT' returns weird file descriptors
> (e.g. -65536) on CCL. Consider example below.
>
> CL-USER> (loop for pkg in '(cffi alexandria usocket epoll)
> do (asdf:oos 'asdf:load-op pkg))
> ...
> NIL
>
> CL-USER> (usocket:with-socket-listener (server-socket "0.0.0.0" 4040 :reuse-address t)
> (alexandria:when-let (client-socket (usocket:socket-accept server-socket))
> (unwind-protect
> (progn
> (epoll:with-epfd (epfd)
> (epoll:epfd-control
> epfd :add (epoll:socket-fd (usocket:socket client-socket))
> :in :pri :err)
> (epoll:epfd-wait epfd 5000)))
> (usocket:socket-close client-socket))))
> ((-65536 :IN))
>
> Any ideas about what might I be missing?
>
>
> Regards.
>
> [1] http://github.com/vy/epoll
> [2] http://cliki.net/epoll
> _______________________________________________
> Openmcl-devel mailing list
> Openmcl-devel at clozure.com
> http://clozure.com/mailman/listinfo/openmcl-devel
>
More information about the Openmcl-devel
mailing list