Hi there,
When I tried the following code from the "test" directory of s-xml-rpc, using SBCL, I got an error:
(assert (let ((server-process (start-xml-rpc-server :port 8080))) (import 's-xml-rpc::xml-rpc-implementation-version :s-xml-rpc-exports) (sleep 1) ; give the server some time to come up ;-) (unwind-protect (equal (xml-rpc-call (encode-xml-rpc-call "XML-RPC-IMPLEMENTATION-VERSION") :port 8080) (xml-rpc-implementation-version)) (s-sysdeps:kill-process server-process) (unintern 's-xml-rpc::xml-rpc-implementation-version :s-xml-rpc-exports))))
The error message is the following (copy-pasted from Slime):
The value (("xml-rpc server /RPC2:8080" #<SB-BSD-SOCKETS:INET-SOCKET descriptor 4 {B61F4C9}> #<SB-IMPL::HANDLER INPUT on descriptor 4: #>)) is not of type SB-THREAD:THREAD. [Condition of type TYPE-ERROR]
Apparently SBCL's implementation of s-sysdeps:start-standard-server is broken...
Does this code still have a maintainer? should I fix it myself and submit a patch?
Thanks, Sebastián
s-xml-rpc-devel@common-lisp.net