[cl-xmpp-devel] premature socket closure?

[Anthony Green]

I'm trying to use cl-xmpp with sbcl 1.0.18.  I've applied the ustream
patch as well as this one:
http://common-lisp.net/pipermail/cl-xmpp-devel/2007-September/000089.html

I can't seem to get the simplest connection going.   Any ideas?

Thanks!

Anthony Green


CL-USER> (defvar *connection* (xmpp:connect :hostname "jabber.org"))

<?xml version='1.0' ?><stream:stream to='jabber.org'
xmlns='jabber:client' xmlns:stream='http://etherx.jabber.org/streams'
version='1.0'><?xml version='1.0'?version='1.0'><stream:stream
xmlns='jabber:client' xmlns:stream='http://etherx.jabber.org/streams'
id='3609488398' from='jabber.org' version='1.0'
xml:lang='en' 


UNHANDLED: #<XML-ELEMENT STREAM:STREAM (6attr:0child:0data)
{BB72571}>
; No value
CL-USER>


#<SB-SYS:FD-STREAM for "a socket" {BD33461}> is closed.
   [Condition of type SIMPLE-ERROR]

Restarts:
  0: [ABORT-REQUEST] Abort handling SLIME request.
  1: [TERMINATE-THREAD] Terminate this thread (#<THREAD "repl-thread"
RUNNING {$

Backtrace:
  0: (SB-KERNEL:CLOSED-FLAME #<SB-SYS:FD-STREAM for "a socket"
{BD33461}>)[:EXT$
  1: (FORCE-OUTPUT #<SB-SYS:FD-STREAM for "a socket" {BD33461}>)
  2: (CL-XMPP::READ-STANZA #<CL-XMPP:CONNECTION to jabber.org:5222
(closed) {A7$
  3: ((SB-PCL::FAST-METHOD CL-XMPP:RECEIVE-STANZA (CL-XMPP:CONNECTION))
#<unava$
  4: (CL-XMPP:CONNECT)[:EXTERNAL]
  5: (SB-INT:SIMPLE-EVAL-IN-LEXENV (CL-XMPP:CONNECT :HOSTNAME
"jabber.org") #<N$
  6: (SB-INT:SIMPLE-EVAL-IN-LEXENV (PROGN (CL-XMPP:CONNECT :HOSTNAME
"jabber.or$
  7: (SB-INT:SIMPLE-EVAL-IN-LEXENV (UNLESS (BOUNDP (QUOTE *CONNECTION*))
(CL-XM$
  8: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SB-IMPL::%DEFVAR (QUOTE
*CONNECTION*) (UNLE$
  9: (SB-INT:SIMPLE-EVAL-IN-LEXENV (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE)
(SB-IMP$
10: (SB-INT:SIMPLE-EVAL-IN-LEXENV (DEFVAR *CONNECTION* (CL-XMPP:CONNECT
:HOSTN$
--more--