;;; Loading "/home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/usocket-test.asd" ;;; Loading "/home/ecl/tmp/ubuntu64.all/lib/ecl-11.1.1/rt.asd" ;;; Loading "/home/ecl/tmp/ubuntu64.all/lib/ecl-11.1.1/rt.fas" ;;; ;;; Compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/package.lECL-TEST-OKTIMIZE levels: Safety=2, Space=0, Speed=3, Debug=0 ;;; ;;; End of Pass 1. ;;; Finished compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/package.lisp. ;;; ;;; Loading "/home/ecl/tmp/ubuntu64.all/.cache/common-lisp/ecl-11.1.1-606449eb-linux-x64/home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/package.fas" ;;; ;;; Compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/test-usocket.lisp. ;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3, Debug=0 ;;; ;;; Compiling (DEFPARAMETER +NON-EXISTING-HOST+ ...). ;;; Compiling (DEFPARAMETER +UNUSED-LOCAL-PORT+ ...). ;;; Compiling (DEFPARAMETER *FAKE-USOCKET* ...). ;;; Compiling (DEFVAR *COMMON-LISP-NET* ...). ;;; Compiling (DEFVAR *LOCAL-IP*). ;;; Compiling (DEFMACRO WITH-CAUGHT-CONDITIONS ...). ;;; Compiling (DEFUN RUN-USOCKET-TESTS ...). ;;; End of Pass 1. ;;; Emitting code for WITH-CAUGHT-CONDITIONS. ;;; Emitting code for RUN-USOCKET-TESTS. ;;; Finished compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/test-usocket.lisp. ;;; ;;; Loading "/home/ecl/tmp/ubuntu64.all/.cache/common-lisp/ecl-11.1.1-606449eb-linux-x64/home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/test-usocket.fas" ;;; ;;; Compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/test-condition.lisp. ;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3, Debug=0 ;;; ;;; End of Pass 1. ;;; Finished compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/test-condition.lisp. ;;; ;;; Loading "/home/ecl/tmp/ubuntu64.all/.cache/common-lisp/ecl-11.1.1-606449eb-linux-x64/home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/test-condition.fas" ;;; ;;; Compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/test-datagram.lisp. ;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3, Debug=0 ;;; ;;; Compiling (DEFVAR *ECHO-SERVER*). ;;; Compiling (DEFVAR *ECHO-SERVER-PORT*). ;;; Compiling (DEFUN START-SERVER ...). ;;; Compiling (DEFPARAMETER *MAX-BUFFER-SIZE* ...). ;;; Compiling (DEFVAR *SEND-BUFFER* ...). ;;; Compiling (DEFVAR *RECEIVE-BUFFER* ...). ;;; Compiling (DEFUN CLEAN-BUFFERS ...). ;;; End of Pass 1. ;;; Emitting code for START-SERVER. ;;; Emitting code for CLEAN-BUFFERS. ;;; Finished compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/test-datagram.lisp. ;;; ;;; Loading "/home/ecl/tmp/ubuntu64.all/.cache/common-lisp/ecl-11.1.1-606449eb-linux-x64/home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/test-datagram.fas" ;;; ;;; Compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/wait-for-input.lisp. ;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3, Debug=0 ;;; ;;; Compiling (DEFPARAMETER *WAIT-FOR-INPUT-TIMEOUT* ...). ;;; Compiling (DEFVAR *SOCKET-SERVER-PORT* ...). ;;; Compiling (DEFVAR *SOCKET-SERVER-LISTEN* ...). ;;; Compiling (DEFVAR *SOCKET-SERVER-CONNECTION*). ;;; Compiling (DEFVAR *SOCKET-CLIENT-CONNECTION*). ;;; Compiling (DEFVAR *OUTPUT-P* ...). ;;; Compiling (DEFUN STAGE-1 ...). ;;; Compiling (DEFUN STAGE-2 ...). ;;; Compiling (DEFUN STAGE-3 ...). ;;; Compiling (DEFUN RECEIVE-EACH ...). ;;; Compiling (DEFUN RECEIVE-ALL ...). ;;; Compiling (DEFUN SEND ...). ;;; Compiling (DEFUN SERVER ...). ;;; Compiling (DEFUN CLIENT ...). ;;; End of Pass 1. ;;; Emitting code for STAGE-1. ;;; Emitting code for STAGE-2. ;;; Emitting code for STAGE-3. ;;; Emitting code for RECEIVE-EACH. ;;; Emitting code for RECEIVE-ALL. ;;; Emitting code for SEND. ;;; Emitting code for SERVER. ;;; Emitting code for CLIENT. ;;; Finished compiling /home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/wait-for-input.lisp. ;;; ;;; Loading "/home/ecl/tmp/ubuntu64.all/.cache/common-lisp/ecl-11.1.1-606449eb-linux-x64/home/ecl/tmp/ubuntu64.all/lisp/quicklisp/dists/quicklisp/software/usocket-0.5.4/test/wait-for-input.fas" Doing 24 pending tests of 24 tests total. USOCKET-TEST::MAKE-SOCKET.1 USOCKET-TEST::MAKE-SOCKET.2 # is an instance of class SIMPLE-PROGRAM-ERROR it has the following instance slots REPORT-FUNCTION: # FORMAT-CONTROL: Wrong number of arguments passed to function ~S. FORMAT-ARGUMENTS: (#) Test USOCKET-TEST::SOCKET-NO-CONNECT.1 failed Form: (USOCKET-TEST::WITH-CAUGHT-CONDITIONS (USOCKET:SOCKET-ERROR NIL) (USOCKET:SOCKET-CONNECT "127.0.0.0" USOCKET-TEST::+UNUSED-LOCAL-PORT+ :TIMEOUT 1) T) Expected value: NIL Actual value: #. Condition: Wrong number of arguments passed to function #. # is an instance of class SIMPLE-PROGRAM-ERROR it has the following instance slots REPORT-FUNCTION: # FORMAT-CONTROL: Wrong number of arguments passed to function ~S. FORMAT-ARGUMENTS: (#) Test USOCKET-TEST::SOCKET-NO-CONNECT.2 failed Form: (USOCKET-TEST::WITH-CAUGHT-CONDITIONS (USOCKET:SOCKET-ERROR NIL) (USOCKET:SOCKET-CONNECT #(127 0 0 0) USOCKET-TEST::+UNUSED-LOCAL-PORT+ :TIMEOUT 1) T) Expected value: NIL Actual value: #. Condition: Wrong number of arguments passed to function #. # is an instance of class SIMPLE-PROGRAM-ERROR it has the following instance slots REPORT-FUNCTION: # FORMAT-CONTROL: Wrong number of arguments passed to function ~S. FORMAT-ARGUMENTS: (#) Test USOCKET-TEST::SOCKET-NO-CONNECT.3 failed Form: (USOCKET-TEST::WITH-CAUGHT-CONDITIONS (USOCKET:SOCKET-ERROR NIL) (USOCKET:SOCKET-CONNECT 2130706432 USOCKET-TEST::+UNUSED-LOCAL-PORT+ :TIMEOUT 1) T) Expected value: NIL Actual value: #. Condition: Wrong number of arguments passed to function #. # is an instance of class SIMPLE-PROGRAM-ERROR it has the following instance slots REPORT-FUNCTION: # FORMAT-CONTROL: Wrong number of arguments passed to function ~S. FORMAT-ARGUMENTS: (#) Test USOCKET-TEST::SOCKET-FAILURE.1 failed Form: (USOCKET-TEST::WITH-CAUGHT-CONDITIONS (USOCKET:TIMEOUT-ERROR NIL) (USOCKET:SOCKET-CONNECT 2130706432 USOCKET-TEST::+UNUSED-LOCAL-PORT+ :TIMEOUT 1) :UNREACH) Expected value: NIL Actual value: #. Condition: Wrong number of arguments passed to function #. # is an instance of class SIMPLE-PROGRAM-ERROR it has the following instance slots REPORT-FUNCTION: # FORMAT-CONTROL: Wrong number of arguments passed to function ~S. FORMAT-ARGUMENTS: (#) Test USOCKET-TEST::SOCKET-FAILURE.2 failed Form: (USOCKET-TEST::WITH-CAUGHT-CONDITIONS (USOCKET:TIMEOUT-ERROR NIL) (USOCKET:SOCKET-CONNECT USOCKET-TEST::+NON-EXISTING-HOST+ 80 :TIMEOUT 1) :UNREACH) Expected value: NIL Actual value: #. Condition: Wrong number of arguments passed to function #. USOCKET-TEST::SOCKET-CONNECT.1 USOCKET-TEST::SOCKET-CONNECT.2 USOCKET-TEST::SOCKET-CONNECT.3 USOCKET-TEST::SOCKET-STREAM.1 USOCKET-TEST::SOCKET-NAME.1 USOCKET-TEST::SOCKET-NAME.2 USOCKET-TEST::SOCKET-NAME.3 # is an instance of class SIMPLE-PROGRAM-ERROR it has the following instance slots REPORT-FUNCTION: # FORMAT-CONTROL: Wrong number of arguments passed to function ~S. FORMAT-ARGUMENTS: (#) Test USOCKET-TEST::NS-HOST-NOT-FOUND-ERROR.1 failed Form: (USOCKET-TEST::WITH-CAUGHT-CONDITIONS (USOCKET:NS-HOST-NOT-FOUND-ERROR NIL) (USOCKET:SOCKET-CONNECT "xxx" 123) T) Expected value: NIL Actual value: #. Condition: Wrong number of arguments passed to function #. # is an instance of class SIMPLE-PROGRAM-ERROR it has the following instance slots REPORT-FUNCTION: # FORMAT-CONTROL: Wrong number of arguments passed to function ~S. FORMAT-ARGUMENTS: (#) Test USOCKET-TEST::TIMEOUT-ERROR.1 failed Form: (USOCKET-TEST::WITH-CAUGHT-CONDITIONS (USOCKET:TIMEOUT-ERROR NIL) (USOCKET:SOCKET-CONNECT "common-lisp.net" 81 :TIMEOUT 0) T) Expected value: NIL Actual value: #. Condition: Wrong number of arguments passed to function #. # is an instance of class SIMPLE-PROGRAM-ERROR it has the following instance slots REPORT-FUNCTION: # FORMAT-CONTROL: Wrong number of arguments passed to function ~S. FORMAT-ARGUMENTS: (#) Test USOCKET-TEST::CONNECTION-REFUSED-ERROR.1 failed Form: (USOCKET-TEST::WITH-CAUGHT-CONDITIONS (USOCKET:CONNECTION-REFUSED-ERROR NIL) (USOCKET:SOCKET-CONNECT "common-lisp.net" 81) T) Expected value: NIL Actual value: #. Condition: Wrong number of arguments passed to function #. # is an instance of class SOCKET-ERROR it has the following instance slots REPORT-FUNCTION: # ERRNO: 13 SYMBOL: NIL SYSCALL: bind Test USOCKET-TEST::OPERATION-NOT-PERMITTED-ERROR.1 failed Form: (USOCKET-TEST::WITH-CAUGHT-CONDITIONS (USOCKET:OPERATION-NOT-PERMITTED-ERROR NIL) (USOCKET:SOCKET-LISTEN "0.0.0.0" 81) T) Expected value: NIL Actual value: #. Condition: Socket error in "bind": 13 (Permission denied) USOCKET-TEST::*ECHO-SERVER* Test USOCKET-TEST::UDP-SEND.1 failed Form: (PROGN (UNLESS (AND USOCKET-TEST::*ECHO-SERVER* USOCKET-TEST::*ECHO-SERVER-PORT*) (USOCKET-TEST::START-SERVER)) (LET ((USOCKET-TEST::S (USOCKET:SOCKET-CONNECT "127.0.0.1" USOCKET-TEST::*ECHO-SERVER-PORT* :PROTOCOL :DATAGRAM))) (USOCKET-TEST::CLEAN-BUFFERS) (REPLACE USOCKET-TEST::*SEND-BUFFER* #(1 2 3 4 5)) (USOCKET:SOCKET-SEND USOCKET-TEST::S USOCKET-TEST::*SEND-BUFFER* 5) (USOCKET:WAIT-FOR-INPUT USOCKET-TEST::S :TIMEOUT 3) (MULTIPLE-VALUE-BIND (USOCKET-TEST::BUFFER USOCKET-TEST::SIZE USOCKET-TEST::HOST USOCKET-TEST::PORT) (USOCKET:SOCKET-RECEIVE USOCKET-TEST::S USOCKET-TEST::*RECEIVE-BUFFER* USOCKET-TEST::*MAX-BUFFER-SIZE*) (DECLARE (IGNORE USOCKET-TEST::BUFFER USOCKET-TEST::SIZE USOCKET-TEST::HOST USOCKET-TEST::PORT)) (REDUCE #'+ USOCKET-TEST::*RECEIVE-BUFFER* :START 0 :END 5)))) Expected value: 15 Actual value: #. Condition: The variable USOCKET-TEST::*ECHO-SERVER* is unbound. USOCKET-TEST::*ECHO-SERVER* Test USOCKET-TEST::UDP-SEND.2 failed Form: (PROGN (UNLESS (AND USOCKET-TEST::*ECHO-SERVER* USOCKET-TEST::*ECHO-SERVER-PORT*) (USOCKET-TEST::START-SERVER)) (LET ((USOCKET-TEST::S (USOCKET:SOCKET-CONNECT NIL NIL :PROTOCOL :DATAGRAM))) (USOCKET-TEST::CLEAN-BUFFERS) (REPLACE USOCKET-TEST::*SEND-BUFFER* #(1 2 3 4 5)) (USOCKET:SOCKET-SEND USOCKET-TEST::S USOCKET-TEST::*SEND-BUFFER* 5 :HOST "127.0.0.1" :PORT USOCKET-TEST::*ECHO-SERVER-PORT*) (USOCKET:WAIT-FOR-INPUT USOCKET-TEST::S :TIMEOUT 3) (MULTIPLE-VALUE-BIND (USOCKET-TEST::BUFFER USOCKET-TEST::SIZE USOCKET-TEST::HOST USOCKET-TEST::PORT) (USOCKET:SOCKET-RECEIVE USOCKET-TEST::S USOCKET-TEST::*RECEIVE-BUFFER* USOCKET-TEST::*MAX-BUFFER-SIZE*) (DECLARE (IGNORE USOCKET-TEST::BUFFER USOCKET-TEST::SIZE USOCKET-TEST::HOST USOCKET-TEST::PORT)) (REDUCE #'+ USOCKET-TEST::*RECEIVE-BUFFER* :START 0 :END 5)))) Expected value: 15 Actual value: #. Condition: The variable USOCKET-TEST::*ECHO-SERVER* is unbound. USOCKET-TEST::WAIT-FOR-INPUT.1 USOCKET-TEST::WAIT-FOR-INPUT.2 USOCKET-TEST::WAIT-FOR-INPUT.3 USOCKET-TEST::ELLIOTT-SLAUGHTER.1 11 out of 24 total tests failed: USOCKET-TEST::SOCKET-NO-CONNECT.1, USOCKET-TEST::SOCKET-NO-CONNECT.2, USOCKET-TEST::SOCKET-NO-CONNECT.3, USOCKET-TEST::SOCKET-FAILURE.1, USOCKET-TEST::SOCKET-FAILURE.2, USOCKET-TEST::NS-HOST-NOT-FOUND-ERROR.1, USOCKET-TEST::TIMEOUT-ERROR.1, USOCKET-TEST::CONNECTION-REFUSED-ERROR.1, USOCKET-TEST::OPERATION-NOT-PERMITTED-ERROR.1, USOCKET-TEST::UDP-SEND.1, USOCKET-TEST::UDP-SEND.2.