[Openmcl-devel] wx86cl-Windows XP SP3 32bit-socket error #22 during write

[John Miller]

I am running CCL 1.3-r1195 (WindowsX8632) and getting the below "(error #22) during write" when trying to connect to the Xming server (or is that client? never could get that straight) on my Windows XP, SP 3 machine.  I also get the same error when I try to connect to swank from Emacs using slime.

I have another Windows XP machine that runs as a virtual machine under parallels and I do not have any problems running slime+swank on ccl on that machine (haven't tried clx, though).  I am stymied- which is admittedly a pretty easy thing to do- but I was wondering if anyone could provide insight into what an "(error #22) during write" means.

The backtrace is below; it seems the error occurs in fd-stream-force-output.

Thank you,
John Miller

? (setq display (open-display "localhost" :display 0))
> Error: on #<BASIC-TCP-STREAM ISO-8859-1 (SOCKET/220) #x964E5AE> :
>        The device does not recognize the command.  (error #22) during write
> While executing: CCL:SOCKET-ERROR, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > :b
 (B80C6C) : 0 (SOCKET-ERROR #<BASIC-TCP-STREAM ISO-8859-1 (SOCKET/220) #x964E5AE
> "write" 22 NIL) 359
 (B80C84) : 1 (FD-STREAM-FORCE-OUTPUT #<BASIC-TCP-STREAM ISO-8859-1 (SOCKET/220)
 #x964E5AE> #S(CCL::IOBLOCK :STREAM #<BASIC-TCP-STREAM ISO-8859-1 (SOCKET/220) #
x964E5AE> :UNTYI-CHAR NIL ...) 12 NIL) 1143
 (B80CB4) : 2 (FUNCALL #'#<#<CCL::STANDARD-KERNEL-METHOD CCL:STREAM-FORCE-OUTPUT
 (CCL::BASIC-OUTPUT-STREAM)>> #<BASIC-TCP-STREAM ISO-8859-1 (SOCKET/220) #x964E5
AE>) 1231
 (B80CCC) : 3 (FORCE-OUTPUT #<BASIC-TCP-STREAM ISO-8859-1 (SOCKET/220) #x964E5AE
>) 119
 (B80CD8) : 4 (BUFFER-FORCE-OUTPUT #<DISPLAY localhost:0 ( R0)>) 295
 (B80CF4) : 5 (DISPLAY-CONNECT #<DISPLAY localhost:0 ( R0)> :AUTHORIZATION-NAME
"" :AUTHORIZATION-DATA "") 1263
 (B80D10) : 6 (OPEN-DISPLAY "localhost" :DISPLAY 0 :PROTOCOL NIL :AUTHORIZATION-
NAME "" :AUTHORIZATION-DATA "") 583
 (B80D60) : 7 (CALL-CHECK-REGS OPEN-DISPLAY "localhost" :DISPLAY 0) 247
 (B80D7C) : 8 (CHEAP-EVAL-IN-ENVIRONMENT ((OPEN-DISPLAY "localhost" :DISPLAY 0))
 NIL) 1759
 (B80DA8) : 9 (TOPLEVEL-EVAL (SETQ DISPLAY (OPEN-DISPLAY "localhost" :DISPLAY 0)
) NIL) 751
 (B80DE8) : 10 (READ-LOOP :INPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x89BA
3D6> :OUTPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x89BA2FE> :BREAK-LEVEL 0
:PROMPT-FUNCTION #<Compiled-function (:INTERNAL CCL::READ-LOOP) (Non-Global)  #x
837564E>) 1815
 (B80EFC) : 11 (TOPLEVEL-LOOP) 71
 (B80F04) : 12 (FUNCALL #'#<(:INTERNAL (CCL:TOPLEVEL-FUNCTION (CCL::LISP-DEVELOP
MENT-SYSTEM T)))>) 95
 (B80F14) : 13 (FUNCALL #'#<(:INTERNAL CCL::MAKE-MCL-LISTENER-PROCESS)>) 583
 (B80F60) : 14 (RUN-PROCESS-INITIAL-FORM #<TTY-LISTENER listener(1) #x89B97B6> (
#<CCL:COMPILED-LEXICAL-CLOSURE # #x89B95E6>)) 671
 (B80FA4) : 15 (FUNCALL #'#<(:INTERNAL CCL::%PROCESS-PRESET-INTERNAL)> #<TTY-LIS
TENER listener(1) #x89B97B6> (#<CCL:COMPILED-LEXICAL-CLOSURE # #x89B95E6>)) 335
 (B80FCC) : 16 (FUNCALL #'#<(:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION)>) 279
1 >