Hi Andrew, [ This mail got rerouted to the mailing list owner because you're not subscribed. Only subscribers can post to the list, in order to prevent SPAM. Thanks for your cooperation! ]
> Subject: Error log > > Below is an error I got when I did (asdf:oos 'asdf:load-op 'usocket) using > clisp-2.43 on Windows 2000. Looking at the trace-back, I see you're using usocket trunk, but if you're reporting an error, please include the version number which you use. I'll have a look at the sources and fix the issue tonight. I think you should search the backend\clisp.lisp file for the string "rawsock:socket-close" and replace it with "socket:socket-close", but this change is untested. Where I am now, I do not have clisp access to test the right change. As I said, I'll check the fix tonight and check in the result. Once I did that, I'll ping you (and the list) through mail. If you don't want to use UDP (which isn't done anyway), a good way to get a working version would be to download one of the official releases. HTH, Erik. > >>>> snip <<<< > > READ from #<INPUT BUFFERED FILE-STREAM CHARACTER > #P"C:\\home\\lisp\\asdf-registry\\usocket\\backend\\clisp.lisp" > @203>: #1=#<PACKAGE > RAWSOCK> has no external symbol with name "SOCKET-CLOSE" > [Condition of type SYSTEM::SIMPLE-PACKAGE-ERROR] > > Restarts: > 0: [RETRY] Retry performing #<ASDF:COMPILE-OP NIL #x19F82EF9> on > #<ASDF:CL-SOURCE-FILE "clisp" #x19F82199>. > 1: [ACCEPT] Continue, treating #<ASDF:COMPILE-OP NIL #x19F82EF9> on > #<ASDF:CL-SOURCE-FILE "clisp" #x19F82199> as having been successful. > 2: [ABORT] Return to SLIME's top level. > 3: [CLOSE-CONNECTION] Close SLIME connection > > Backtrace: > 0: INVOKE-DEBUGGER > 1: SYSTEM::LPAR-READER > 2: SYSTEM::LPAR-READER > 3: SYSTEM::LPAR-READER > 4: SYSTEM::FEATURE-READER > 5: READ > 6: unwind-protect frame > 7: unwind-protect frame > 8: unwind-protect frame > 9: unwind-protect frame > 10: COMPILE-FILE > 11: (COMPILE-FILE ASDF:SOURCE-FILE :OUTPUT-FILE ASDF::OUTPUT-FILE) > 12: MULTIPLE-VALUE-BIND > 13: LET > 14: (:LAMBDA '#<ASDF:COMPILE-OP NIL #x19F82EF9> '#1=#<ASDF:CL-SOURCE-FILE > "clisp" #x19F82199>) > 15: :LAMBDA (ASDF:OPERATION ASDF::C) (DECLARE (IGNORABLE ASDF:OPERATION > ASDF::C)) (BLOCK ASDF:PERFORM (LET (# #) (MULTIPLE-VALUE-BIND # # # # #))) > 16: ((LAMBDA #1=(ASDF:OPERATION ASDF::C) (DECLARE (SYSTEM::SOURCE #)) > #2=(DECLARE (IGNORABLE ASDF:OPERATION ASDF::C)) #3=(LET (# #) > (MULTIPLE-VALUE-BIND # # # # #))) #:G4057 #:G4058) > 17: frame binding functions #<ADDRESS #x011218B0> binds (~ = dynamically): > | CALL-NEXT-METHOD <--> #<FUNCTION-MACRO #<FUNCTION CALL-NEXT-METHOD > (SYSTEM::<MACRO-FORM> SYSTEM::<ENV-ARG>) (DECLARE (CONS > SYSTEM::<MACRO-FORM>)) (DECLARE (IGNORE SYSTEM::<ENV-ARG>)) (IF (NOT #) > (SYSTEM::MACRO-CALL-ERROR SYSTEM::<MACRO-FORM>) (LET* # #))> #<FUNCTION > CALL-NEXT-METHOD (&REST CLOS::NEW-ARGS) (IF CLOS::NEW-ARGS (IF # # #) (IF > #:G4056 # #))>> > Next environment: > | NEXT-METHOD-P <--> #<FUNCTION-MACRO #<FUNCTION NEXT-METHOD-P > (SYSTEM::<MACRO-FORM> SYSTEM::<ENV-ARG>) (DECLARE (CONS > SYSTEM::<MACRO-FORM>)) (DECLARE (IGNORE SYSTEM::<ENV-ARG>)) (IF (NOT #) > (SYSTEM::MACRO-CALL-ERROR SYSTEM::<MACRO-FORM>) (LET* NIL #))> #<FUNCTION > NEXT-METHOD-P NIL #:G4056>> > | CALL-NEXT-METHOD <--> #<FUNCTION-MACRO #<FUNCTION CALL-NEXT-METHOD > (SYSTEM::<MACRO-FORM> SYSTEM::<ENV-ARG>) (DECLARE (CONS > SYSTEM::<MACRO-FORM>)) (DECLARE (IGNORE SYSTEM::<ENV-ARG>)) (IF (NOT #) > (SYSTEM::MACRO-CALL-ERROR SYSTEM::<MACRO-FORM>) (LET* # #))> #<FUNCTION > CALL-NEXT-METHOD (&REST CLOS::NEW-ARGS) (IF CLOS::NEW-ARGS (IF # # #) (IF > #:G4056 # #))>> > 18: SYSTEM::FUNCTION-MACRO-LET > 19: (:LAMBDA '#<COMPILED-FUNCTION #:COMPILED-FORM-322-1-1> > '#<ASDF:COMPILE-OP NIL #x19F82EF9> '#1=#<ASDF:CL-SOURCE-FILE "clisp" > #x19F82199>) > 20: :LAMBDA (#:G4056 #:G4057 #:G4058) (SYSTEM::FUNCTION-MACRO-LET > ((CALL-NEXT-METHOD # #) (NEXT-METHOD-P # #)) ((LAMBDA # # #) #:G4057 > #:G4058)) > 21: #:COMPILED-FORM-322-1 > 22: (ASDF:PERFORM ASDF::OP ASDF:COMPONENT) > 23: PROGN > 24: RETURN-FROM > 25: LET* > 26: nested tagbody frame #<ADDRESS #x011217B0> for > | #:G4154 --> ((RETURN-FROM #:RESTART-4155 (APPLY #'(LAMBDA NIL # # > #) #:ARGS-4156))) > | #:G4153 --> ((RETURN-FROM #1=#:RESTART-4155 (APPLY #'(LAMBDA NIL #) > #2=#:ARGS-4156)) #:G4154 (RETURN-FROM #1# (APPLY #'(LAMBDA NIL # # #) #2#))) > Next environment: > | #(#:G4154 #:G4153) --> #<ADDRESS #x011217B0> > | #(#:LOOP-4152) --> #<ADDRESS #x01121724> > | #(SYSTEM::END-LOOP SYSTEM::BEGIN-LOOP) --> #<ADDRESS #x011216D0> > 27: TAGBODY > 28: LET > 29: nested block frame #<ADDRESS #x01121744> for #:RESTART-4155 > Next environment: > | #:RESTART-4155 --> #<ADDRESS #x01121744> > | NIL --> #<ADDRESS #x011216F0> > 30: BLOCK > 31: nested tagbody frame #<ADDRESS #x01121724> for > | #:LOOP-4152 --> ((BLOCK #1=#:RESTART-4155 (LET (#2=#:ARGS-4156) > (TAGBODY # #3=#:G4153 # #4=#:G4154 #))) (GO #:LOOP-4152)) > Next environment: > | #(#:LOOP-4152) --> #<ADDRESS #x01121724> > | #(SYSTEM::END-LOOP SYSTEM::BEGIN-LOOP) --> #<ADDRESS #x011216D0> > 32: TAGBODY > 33: nested block frame #<ADDRESS #x011216F0> for NIL > Next environment: > | NIL --> #<ADDRESS #x011216F0> > 34: BLOCK > 35: nested tagbody frame #<ADDRESS #x011216D0> for > | SYSTEM::END-LOOP --> NIL > | SYSTEM::BEGIN-LOOP --> ((WHEN (ENDP #1=#:LIST-4150) (GO > SYSTEM::END-LOOP)) (SETQ ASDF::OP (CAR (SETQ #2=#:PATTERN-4151 #)) > ASDF:COMPONENT (CDR #2#)) (BLOCK NIL (TAGBODY #3=#:LOOP-4152 (BLOCK > #4=#:RESTART-4155 #) (GO #3#))) (PSETQ #1# (CDR #1#)) (GO > SYSTEM::BEGIN-LOOP) SYSTEM::END-LOOP) > Next environment: > | #(SYSTEM::END-LOOP SYSTEM::BEGIN-LOOP) --> #<ADDRESS #x011216D0> > 36: TAGBODY > 37: LET > 38: LET > 39: LET > 40: LET > 41: unwind-protect frame > 42: UNWIND-PROTECT > 43: PROGV > 44: LET > 45: LET > 46: LET* > 47: (ASDF:OPERATE 'ASDF:LOAD-OP 'USOCKET) > 48: ASDF:OPERATE (ASDF::OPERATION-CLASS ASDF:SYSTEM &REST ASDF::ARGS &KEY > (ASDF::VERBOSE T) ...) (DECLARE (SYSTEM::IN-DEFUN ASDF:OPERATE)) (BLOCK > ASDF:OPERATE (LET* (# # #) (UNLESS # #) (LET # #))) > 49: (ASDF:OPERATE 'ASDF:LOAD-OP LIB) > 50: (ASDF 'USOCKET) > 51: ASDF (LIB) (DECLARE (SYSTEM::IN-DEFUN ASDF)) (BLOCK ASDF (ASDF:OPERATE > 'ASDF:LOAD-OP LIB)) > 52: (ASDF 'USOCKET) > 53: EVAL > 54: unwind-protect frame > 55: SWANK::EVAL-REGION > 56: SWANK::REPL-EVAL-1-1 > 57: unwind-protect frame > 58: SWANK::TRACK-PACKAGE > 59: SWANK::REPL-EVAL-1 > 60: #:|314 316 (DEFINTERFACE CALL-WITH-SYNTAX-HOOKS (FN) ...)-32-3-1| > 61: SWANK-BACKEND:CALL-WITH-SYNTAX-HOOKS > 62: SWANK::CALL-WITH-BUFFER-SYNTAX > 63: SWANK::REPL-EVAL > 64: SWANK:LISTENER-EVAL > 65: (SWANK:LISTENER-EVAL "(asdf 'usocket) > ") > 66: EVAL > 67: unwind-protect frame > 68: SWANK::EVAL-FOR-EMACS-1 > 69: #:|588 593 (DEFINTERFACE CALL-WITH-DEBUGGER-HOOK (HOOK FUN) > ...)-57-3-1| > 70: SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK > 71: SWANK::EVAL-FOR-EMACS > 72: SWANK::READ-FROM-EMACS > 73: catch frame for tag #:SIMPLE-RESTART-22247 > 74: SWANK::HANDLE-REQUEST-1 > 75: #:|588 593 (DEFINTERFACE CALL-WITH-DEBUGGER-HOOK (HOOK FUN) > ...)-57-3-1| > 76: SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK > 77: SWANK::CALL-WITH-CONNECTION-1 > 78: SWANK::CALL-WITH-REDIRECTED-IO > 79: SWANK::MAYBE-CALL-WITH-IO-REDIRECTION > 80: SWANK::CALL-WITH-CONNECTION > 81: SWANK::HANDLE-REQUEST > 82: SWANK::SIMPLE-SERVE-REQUESTS-2 > 83: handler frame for conditions SWANK::SWANK-ERROR > 84: compiled block frame for #S(RESTART :NAME SWANK::CLOSE-CONNECTION :TEST > #<COMPILED-FUNCTION SYSTEM::DEFAULT-RESTART-TEST> :INVOKE-TAG > #:SIMPLE-RESTART-22757 :INVOKE-FUNCTION NIL :REPORT #<FUNCTION :LAMBDA > (STREAM) (FORMAT STREAM "Close SLIME connection")> :INTERACTIVE > #<COMPILED-FUNCTION SYSTEM::DEFAULT-RESTART-INTERACTIVE> > :MEANINGFULP T) > 85: catch frame for tag #:SIMPLE-RESTART-22757 > 86: unwind-protect frame > 87: SWANK::SIMPLE-SERVE-REQUESTS > 88: SWANK::SERVE-REQUESTS > 89: unwind-protect frame > 90: SWANK::SERVE-CONNECTION > 91: SWANK::SETUP-SERVER-SERVE > 92: SWANK::SETUP-SERVER > 93: SWANK:START-SERVER > 94: (FUNCALL (READ-FROM-STRING "swank:start-server") > "c:/DOCUME~1/102508/LOCALS~1/Temp/slime.2292" > :CODING-SYSTEM "iso-latin-1-unix") > 95: PROGN > 96: SYSTEM::READ-EVAL-PRINT > 97: compiled tagbody frame for #(NIL) > 98: catch frame for tag DEBUG > > > > ---------- Forwarded message ---------- > From: [EMAIL PROTECTED] > To: > Date: > Subject: confirm ef7998fa3354a5fff1723eeee3363d7ee4d6e0b2 > If you reply to this message, keeping the Subject: header intact, > Mailman will discard the held message. Do this if the message is > spam. If you reply to this message and include an Approved: header > with the list password in it, the message will be approved for posting > to the list. The Approved: header can also appear in the first line > of the body of the reply. > _______________________________________________ usocket-devel mailing list [email protected] http://common-lisp.net/cgi-bin/mailman/listinfo/usocket-devel
