API tools faq
paste
logicmoo

Untitled

logicmoo
Jun 17th, 2019
580
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 59.28 KB | None | 0 0
raw download clone embed print report
  1. root@gitlab:/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src# sbcl --load main
  2. This is SBCL 1.4.16.debian, an implementation of ANSI Common Lisp.
  3. More information about SBCL is available at <http://www.sbcl.org/>.
  4.  
  5. SBCL is free software, provided as is, with absolutely no warranty.
  6. It is mostly in the public domain; some portions are provided under
  7. BSD-style licenses.  See the CREDITS and COPYING files in the
  8. distribution for more information.
  9. To load "alexandria":
  10.   Load 1 ASDF system:
  11.     alexandria
  12. ; Loading "alexandria"
  13.  
  14. To load "protest/parachute":
  15.   Load 1 ASDF system:
  16.     protest/parachute
  17. ; Loading "protest/parachute"
  18.  
  19. To load "gateway.init":
  20.   Load 1 ASDF system:
  21.     gateway.init
  22. ; Loading "gateway.init"
  23.  
  24. WARNING: PARSE-VERSION: "0.8.3-dev" doesn't follow asdf version numbering convention
  25. WARNING: Invalid :version specifier (:READ-FILE-FORM "version.sexp") for component "usocket" from file #P"/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/usocket/usocket.asd", using NIL instead
  26. WARNING: Invalid :version specifier (:READ-FILE-FORM "version.sexp") for component "usocket" from file #P"/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/usocket/usocket.asd", using NIL instead
  27. WARNING: redefining DISSECT:STACK in DEFUN
  28. WARNING: redefining DISSECT:RESTARTS in DEFUN
  29. WARNING: redefining DISSECT::STACK-CAPPER in DEFUN
  30. WARNING: redefining DISSECT::STACK-TRUNCATOR in DEFUN
  31. WARNING: redefining DISSECT:WITH-TRUNCATED-STACK in DEFMACRO
  32. WARNING:
  33.   redefining HANDLER (#<STANDARD-CLASS GATEWAY.CONNECTOR/IMPL:STANDARD-ACCEPTOR>) in DEFMETHOD
  34. WARNING:
  35.   redefining (SETF HANDLER) (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>
  36.                              #<STANDARD-CLASS GATEWAY.CONNECTOR/IMPL:STANDARD-ACCEPTOR>) in DEFMETHOD
  37. WARNING: redefining CL-CPUS:GET-NUMBER-OF-PROCESSORS in DEFUN
  38. WARNING: System definition file #P"/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/quicklisp/dists/quicklisp/software/cl-ppcre-20190521-git/cl-ppcre.asd" contains definition for system "cl-ppcre-test". Please only define "cl-ppcre" and secondary systems with a name starting with "cl-ppcre/" (e.g. "cl-ppcre/test") in that file.
  39. WARNING: System definition file #P"/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/quicklisp/dists/quicklisp/software/cl-base64-20150923-git/cl-base64.asd" contains definition for system "cl-base64-tests". Please only define "cl-base64" and secondary systems with a name starting with "cl-base64/" (e.g. "cl-base64/test") in that file.
  40. WARNING: System definition file #P"/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/quicklisp/dists/quicklisp/software/flexi-streams-20190107-git/flexi-streams.asd" contains definition for system "flexi-streams-test". Please only define "flexi-streams" and secondary systems with a name starting with "flexi-streams/" (e.g. "flexi-streams/test") in that file.
  41. Switching to the BALLAND2006 optimizer
  42. STYLE-WARNING:
  43.   Generic function FSET:ITERATOR clobbers an earlier FTYPE proclamation
  44.   (FUNCTION (T &KEY &ALLOW-OTHER-KEYS) (VALUES FUNCTION &REST T)) for the same
  45.   name with (FUNCTION (T &KEY &ALLOW-OTHER-KEYS) *).
  46. STYLE-WARNING:
  47.   Generic function FSET:CONVERT clobbers an earlier FTYPE proclamation
  48.   (FUNCTION (T T &KEY &ALLOW-OTHER-KEYS) *) for the same name with
  49.   (FUNCTION (T T &KEY &ALLOW-OTHER-KEYS) *).
  50. STYLE-WARNING:
  51.   Generic function OVERLORD/TARGET-PROTOCOL:TARGET-EXISTS? clobbers an earlier
  52.   FTYPE proclamation (FUNCTION (T) (VALUES &OPTIONAL BOOLEAN &REST T)) for the
  53.   same name with (FUNCTION (T) *).
  54. STYLE-WARNING:
  55.   Generic function OVERLORD/TARGET-PROTOCOL:TARGET= clobbers an earlier FTYPE
  56.   proclamation (FUNCTION (T T) (VALUES &OPTIONAL BOOLEAN &REST T)) for the
  57.   same name with (FUNCTION (T T) *).
  58. STYLE-WARNING:
  59.   Generic function OVERLORD/TARGET-PROTOCOL:HASH-TARGET clobbers an earlier
  60.   FTYPE proclamation (FUNCTION (T) (VALUES (UNSIGNED-BYTE 62) &REST T)) for
  61.   the same name with (FUNCTION (T) *).
  62. WARNING:
  63.   redefining TARGET-BUILD-TIME (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
  64. WARNING: redefining POSTMODERN:DAO-KEYS in DEFGENERIC
  65. WARNING:
  66.   redefining (SETF FIELD) :AROUND (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>
  67.                                    #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>
  68.                                    #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
  69. WARNING:
  70.   redefining REMFIELD :AROUND (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>
  71.                                #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
  72. [Overlord] Reloading database (40,696 bytes)
  73. [Overlord] Compacting log-file
  74. [Overlord] @ /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/player_sql.fasl
  75. ; compiling file "/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/quicklisp/dists/quicklisp/software/vernacular-20190521-git/universal.lisp" (written 17 JUN 2019 01:49:23 AM):
  76. ; compiling NIL
  77. ; compiling NIL
  78. ; compiling (SETQ VERNACULAR/SPECIALS:*MODULE* ...)
  79.  
  80. ; wrote /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/player_sql.fasl
  81. ; compilation finished in 0:00:00.126
  82. COMMON-LISP:WARNING: Redefining configuration GATEWAY.SQL::SYSTEM/PLAYER.DO
  83. [Overlord] @ /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/player-group_sql.fasl
  84. ; compiling file "/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/quicklisp/dists/quicklisp/software/vernacular-20190521-git/universal.lisp" (written 17 JUN 2019 01:49:23 AM):
  85. ; compiling NIL
  86. ; compiling NIL
  87. ; compiling (SETQ VERNACULAR/SPECIALS:*MODULE* ...)
  88.  
  89. ; wrote /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/player-group_sql.fasl
  90. ; compilation finished in 0:00:00.047
  91. COMMON-LISP:WARNING:
  92.   Redefining configuration GATEWAY.SQL::SYSTEM/PLAYER-GROUP.DO
  93. [Overlord] @ /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/players-groups_sql.fasl
  94. ; compiling file "/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/quicklisp/dists/quicklisp/software/vernacular-20190521-git/universal.lisp" (written 17 JUN 2019 01:49:23 AM):
  95. ; compiling NIL
  96. ; compiling NIL
  97. ; compiling (SETQ VERNACULAR/SPECIALS:*MODULE* ...)
  98.  
  99. ; wrote /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/players-groups_sql.fasl
  100. ; compilation finished in 0:00:00.536
  101. COMMON-LISP:WARNING:
  102.   Redefining configuration GATEWAY.SQL::SYSTEM/PLAYERS-GROUPS.DO
  103. [Overlord] @ /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/persona_sql.fasl
  104. ; compiling file "/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/quicklisp/dists/quicklisp/software/vernacular-20190521-git/universal.lisp" (written 17 JUN 2019 01:49:23 AM):
  105. ; compiling NIL
  106. ; compiling NIL
  107. ; compiling (SETQ VERNACULAR/SPECIALS:*MODULE* ...)
  108.  
  109. ; wrote /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/persona_sql.fasl
  110. ; compilation finished in 0:00:00.047
  111. COMMON-LISP:WARNING: Redefining configuration GATEWAY.SQL::SYSTEM/PERSONA.DO
  112. [Overlord] @ /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/players-personas_sql.fasl
  113. ; compiling file "/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/quicklisp/dists/quicklisp/software/vernacular-20190521-git/universal.lisp" (written 17 JUN 2019 01:49:23 AM):
  114. ; compiling NIL
  115. ; compiling NIL
  116. ; compiling (SETQ VERNACULAR/SPECIALS:*MODULE* ...)
  117.  
  118. ; wrote /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/players-personas_sql.fasl
  119. ; compilation finished in 0:00:00.060
  120. COMMON-LISP:WARNING:
  121.   Redefining configuration GATEWAY.SQL::SYSTEM/PLAYERS-PERSONAS.DO
  122. [Overlord] @ /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/timeline_sql.fasl
  123. ; compiling file "/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/quicklisp/dists/quicklisp/software/vernacular-20190521-git/universal.lisp" (written 17 JUN 2019 01:49:23 AM):
  124. ; compiling NIL
  125. ; compiling NIL
  126. ; compiling (SETQ VERNACULAR/SPECIALS:*MODULE* ...)
  127.  
  128. ; wrote /root/.cache/overlord/v51/sbcl-1.4.16.debian-linux-x64/vernacular/0/fasls/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/sql/src/yesql/system/timeline_sql.fasl
  129. ; compilation finished in 0:00:00.049
  130. COMMON-LISP:WARNING: Redefining configuration GATEWAY.SQL::SYSTEM/TIMELINE.DO
  131. [Overlord] @ 'SYSTEM/TIMELINE
  132. [Overlord] @ 'SYSTEM/PLAYERS-GROUPS
  133. [Overlord] @ 'SYSTEM/PLAYERS-PERSONAS
  134. [Overlord] @ 'SYSTEM/PLAYER-GROUP
  135. [Overlord] @ 'SYSTEM/PERSONA
  136. [Overlord] @ 'SYSTEM/PLAYER
  137.             ？ GATEWAY.INIT::GATEWAY-FULL-TEST
  138.             ？   GATEWAY.SQL/TEST::SQL
  139.             ？     GATEWAY.SQL/TEST::SQL-NEGATIVE
  140.             ？       GATEWAY.SQL/TEST::TIMELINE-NEGATIVE
  141. WARNING: Unhandled error when evaluating GATEWAY.SQL/TEST::TIMELINE-NEGATIVE:
  142.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  143.  
  144.       0.032 ✘       GATEWAY.SQL/TEST::TIMELINE-NEGATIVE
  145.             ？       GATEWAY.SQL/TEST::PERSONAS-NEGATIVE
  146. WARNING: Unhandled error when evaluating GATEWAY.SQL/TEST::PERSONAS-NEGATIVE:
  147.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  148.  
  149.       0.010 ✘       GATEWAY.SQL/TEST::PERSONAS-NEGATIVE
  150.             ？       GATEWAY.SQL/TEST::PERSONA-NEGATIVE
  151. WARNING: Unhandled error when evaluating GATEWAY.SQL/TEST::PERSONA-NEGATIVE:
  152.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  153.  
  154.       0.009 ✘       GATEWAY.SQL/TEST::PERSONA-NEGATIVE
  155.             ？       GATEWAY.SQL/TEST::PLAYERS-GROUPS-NEGATIVE
  156. WARNING:
  157.   Unhandled error when evaluating GATEWAY.SQL/TEST::PLAYERS-GROUPS-NEGATIVE:
  158.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  159.  
  160.       0.011 ✘       GATEWAY.SQL/TEST::PLAYERS-GROUPS-NEGATIVE
  161.             ？       GATEWAY.SQL/TEST::PLAYER-GROUP-NEGATIVE
  162. WARNING:
  163.   Unhandled error when evaluating GATEWAY.SQL/TEST::PLAYER-GROUP-NEGATIVE:
  164.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  165.  
  166.       0.011 ✘       GATEWAY.SQL/TEST::PLAYER-GROUP-NEGATIVE
  167.             ？       GATEWAY.SQL/TEST::PLAYER-NEGATIVE
  168. WARNING: Unhandled error when evaluating GATEWAY.SQL/TEST::PLAYER-NEGATIVE:
  169.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  170.  
  171.       0.011 ✘       GATEWAY.SQL/TEST::PLAYER-NEGATIVE
  172.       0.088 ✘     GATEWAY.SQL/TEST::SQL-NEGATIVE
  173.             ？     GATEWAY.SQL/TEST::SQL-POSITIVE
  174.             ？       GATEWAY.SQL/TEST::TIMELINE-POSITIVE
  175. WARNING: Unhandled error when evaluating GATEWAY.SQL/TEST::TIMELINE-POSITIVE:
  176.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  177.  
  178.       0.010 ✘       GATEWAY.SQL/TEST::TIMELINE-POSITIVE
  179.             ？       GATEWAY.SQL/TEST::PLAYERS-PERSONAS-POSITIVE
  180. WARNING:
  181.   Unhandled error when evaluating GATEWAY.SQL/TEST::PLAYERS-PERSONAS-POSITIVE:
  182.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  183.  
  184.       0.010 ✘       GATEWAY.SQL/TEST::PLAYERS-PERSONAS-POSITIVE
  185.             ？       GATEWAY.SQL/TEST::PERSONA-POSITIVE
  186. WARNING: Unhandled error when evaluating GATEWAY.SQL/TEST::PERSONA-POSITIVE:
  187.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  188.  
  189.       0.011 ✘       GATEWAY.SQL/TEST::PERSONA-POSITIVE
  190.             ？       GATEWAY.SQL/TEST::PLAYERS-GROUPS-POSITIVE
  191. WARNING:
  192.   Unhandled error when evaluating GATEWAY.SQL/TEST::PLAYERS-GROUPS-POSITIVE:
  193.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  194.  
  195.       0.009 ✘       GATEWAY.SQL/TEST::PLAYERS-GROUPS-POSITIVE
  196.             ？       GATEWAY.SQL/TEST::PLAYER-GROUP-POSITIVE
  197. WARNING:
  198.   Unhandled error when evaluating GATEWAY.SQL/TEST::PLAYER-GROUP-POSITIVE:
  199.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  200.  
  201.       0.009 ✘       GATEWAY.SQL/TEST::PLAYER-GROUP-POSITIVE
  202.             ？       GATEWAY.SQL/TEST::PLAYER-POSITIVE
  203. WARNING: Unhandled error when evaluating GATEWAY.SQL/TEST::PLAYER-POSITIVE:
  204.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  205.  
  206.       0.011 ✘       GATEWAY.SQL/TEST::PLAYER-POSITIVE
  207.       0.062 ✘     GATEWAY.SQL/TEST::SQL-POSITIVE
  208.             ？     GATEWAY.SQL/TEST::SQL-SELECT-DUMMY
  209. WARNING: Unhandled error when evaluating GATEWAY.SQL/TEST::SQL-SELECT-DUMMY:
  210.  SSL verify error: 18 X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT
  211.  
  212.       0.005 ✘     GATEWAY.SQL/TEST::SQL-SELECT-DUMMY
  213.       0.157 ✘   GATEWAY.SQL/TEST::SQL
  214.             ？   GATEWAY.ENGINE/TEST::ENGINE
  215.             ？     GATEWAY.ENGINE/TEST::STANDARD-ENGINE
  216.             #       Phase :ASSERT
  217.   5   0.003 ✔       (true (wait () (with-lock-held (lock) (= var 5050))))
  218.   6   0.002 ✔       (true (wait () (engine-kernel-queue-empty-p engine)))
  219.       0.041 ✔     GATEWAY.ENGINE/TEST::STANDARD-ENGINE
  220.       0.041 ✔   GATEWAY.ENGINE/TEST::ENGINE
  221.             ？   GATEWAY.CONNECTOR/TEST::CONNECTOR
  222.             ？     GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR
  223.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR-DEATH
  224.             #         Phase :ARRANGE
  225.   2   0.000 ✔         (true (wait () (not (deadp connector))))
  226.   3   0.000 ✔         (false (every #'deadp (acceptors connector)))
  227.    4   0.000 ✔         (false (every #'deadp (listeners connector)))
  228.   5   0.001 ✔         (false (every #'deadp (writers connector)))
  229.              #         Phase :ASSERT
  230.    7   0.000 ✔         (true (wait () (deadp connector)))
  231.    8   0.000 ✔         (true (every #'deadp (acceptors connector)))
  232.   9   0.000 ✔         (true (every #'deadp (listeners connector)))
  233.   10   0.000 ✔         (true (every #'deadp (writers connector)))
  234.       0.095 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR-DEATH
  235.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR-ECHO
  236.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  237.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  238.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  239.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  240.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  241.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  242.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  243.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  244.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  245.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  246.   4   1.003 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  247.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  248.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  249.   4   1.003 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  250.   4   1.003 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  251.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  252.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  253.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  254.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  255.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  256.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  257.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  258.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  259.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  260.   4   1.003 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  261.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  262.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  263.   4   1.001 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  264.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  265.   4   1.002 ✘         (true (wait () (cable-equal data (connection-receive conn))))
  266.      31.120 ✘       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR-ECHO
  267.      31.216 ✘     GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR
  268.             ？     GATEWAY.CONNECTOR/TEST::STANDARD-WRITER
  269.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-WRITER-DEATH
  270.             #         Phase :ARRANGE
  271.   2   0.000 ✔         (false (deadp writer))
  272.             #         Phase :ASSERT
  273.   4   0.007 ✔         (true (wait () (deadp writer)))
  274.       0.017 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-WRITER-DEATH
  275.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-WRITER-WRITE-DATA
  276.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  277.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  278.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  279.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  280.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  281.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  282.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  283.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  284.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  285.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  286.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  287.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  288.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  289.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  290.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  291.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  292.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  293.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  294.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  295.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  296.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  297.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  298.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  299.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  300.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  301.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  302.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  303.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  304.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  305.   6   0.002 ✔         (is cable-equal data (wait () (connection-receive (second conns))))
  306.       0.066 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-WRITER-WRITE-DATA
  307.       0.083 ✔     GATEWAY.CONNECTOR/TEST::STANDARD-WRITER
  308.             ？     GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER
  309.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-INVALID-INPUT
  310.   6   1.003 ✘         (true (wait () flag))
  311.   6   1.001 ✘         (true (wait () flag))
  312.   6   1.016 ✘         (true (wait () flag))
  313.       3.031 ✘       GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-INVALID-INPUT
  314.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-MESSAGE
  315.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  316.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  317.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  318.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  319.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  320.   7   1.004 ✘         (true (wait () (funcall test-fn data)))
  321.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  322.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  323.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  324.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  325.   7   1.004 ✘         (true (wait () (funcall test-fn data)))
  326.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  327.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  328.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  329.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  330.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  331.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  332.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  333.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  334.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  335.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  336.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  337.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  338.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  339.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  340.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  341.   7   1.002 ✘         (true (wait () (funcall test-fn data)))
  342.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  343.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  344.   7   1.001 ✘         (true (wait () (funcall test-fn data)))
  345.      30.095 ✘       GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-MESSAGE
  346.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-DEAD-CONNECTION
  347.             #         Phase :ARRANGE
  348.   4   0.000 ✔         (false (deadp listener))
  349.   5   0.000 ✔         (is = 1 (connection-count listener))
  350.             #         Phase :ASSERT
  351.   7   1.001 ✘         (true (wait () (= 0 (connection-count listener))))
  352.   8   0.000 ✔         (false (deadp listener))
  353.   9   0.000 ✘         (true flag)
  354.       1.036 ✘       GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-DEAD-CONNECTION
  355.      34.162 ✘     GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER
  356.             ？     GATEWAY.CONNECTOR/TEST::STANDARD-ACCEPTOR
  357.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-ACCEPTOR-DEATH
  358.             #         Phase :ARRANGE
  359.   2   0.000 ✔         (false (deadp acceptor))
  360.             #         Phase :ASSERT
  361.   4   0.000 ✔         (true (wait () (deadp acceptor)))
  362.       0.018 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-ACCEPTOR-DEATH
  363.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-ACCEPTOR-UNIT
  364.   3   0.001 ✔         (true (wait () (= 3 (length (with-lock-held (lock) connections)))))
  365.       0.006 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-ACCEPTOR-UNIT
  366.       0.025 ✔     GATEWAY.CONNECTOR/TEST::STANDARD-ACCEPTOR
  367.             ？     GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION
  368.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-SEND-RECEIVE
  369.   3   0.000 ✔         (true (wait () (readyp y)))
  370.   4   0.001 ✔         (is cable-equal data (connection-receive y))
  371.   3   0.000 ✔         (true (wait () (readyp y)))
  372.   4   0.000 ✔         (is cable-equal data (connection-receive y))
  373.   3   0.000 ✔         (true (wait () (readyp y)))
  374.   4   0.000 ✔         (is cable-equal data (connection-receive y))
  375.   3   0.000 ✔         (true (wait () (readyp y)))
  376.   4   0.000 ✔         (is cable-equal data (connection-receive y))
  377.   3   0.000 ✔         (true (wait () (readyp y)))
  378.   4   0.001 ✔         (is cable-equal data (connection-receive y))
  379.   3   0.000 ✔         (true (wait () (readyp y)))
  380.   4   0.000 ✔         (is cable-equal data (connection-receive y))
  381.   3   0.000 ✔         (true (wait () (readyp y)))
  382.   4   0.000 ✔         (is cable-equal data (connection-receive y))
  383.   3   0.000 ✔         (true (wait () (readyp y)))
  384.   4   0.000 ✔         (is cable-equal data (connection-receive y))
  385.   3   0.000 ✔         (true (wait () (readyp y)))
  386.   4   0.000 ✔         (is cable-equal data (connection-receive y))
  387.   3   0.000 ✔         (true (wait () (readyp y)))
  388.   4   0.001 ✔         (is cable-equal data (connection-receive y))
  389.       0.011 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-SEND-RECEIVE
  390.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-DEATH
  391.             #         Phase :ARRANGE
  392.   2   0.000 ✔         (false (deadp (first conns)))
  393.   3   0.000 ✔         (false (deadp (second conns)))
  394.             #         Phase :ASSERT
  395.   5   0.000 ✔         (true (deadp (first conns)))
  396.   6   0.000 ✔         (true (deadp (second conns)))
  397.       0.016 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-DEATH
  398.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-DEAD
  399.             #         Phase :ARRANGE
  400.   3   0.000 ✔         (true (wait () (readyp (second conns))))
  401.             #         Phase :ASSERT
  402.   5   0.000 ✔         (false message)
  403.   6   0.000 ✔         (false alivep)
  404.       0.012 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-DEAD
  405.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-INCOMPLETE-INPUT
  406.             #         Phase :ARRANGE
  407.   3   0.000 ✔         (true (readyp (second conns)))
  408.             #         Phase :ASSERT
  409.   5   0.000 ✔         (false (readyp (second conns)))
  410.   6   0.000 ✔         (false message)
  411.   7   0.000 ✔         (true alivep)
  412.       0.016 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-INCOMPLETE-INPUT
  413.             ？       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-COMPLETE-INPUT
  414.             #         Phase :ARRANGE
  415.   3   0.000 ✔         (true (readyp (second conns)))
  416.             #         Phase :ASSERT
  417.   5   0.000 ✔         (false (readyp (second conns)))
  418.   6   0.000 ✔         (is cable-equal message '(1 2 3 4))
  419.    7   0.000 ✔         (is eq alivep t)
  420.        0.020 ✔       GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION-COMPLETE-INPUT
  421.        0.075 ✔     GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTION
  422.       65.561 ✘   GATEWAY.CONNECTOR/TEST::CONNECTOR
  423.              ？   GATEWAY.CABLE/TEST::CABLE
  424.              ？     GATEWAY.CABLE/TEST::CABLE-DEPTH-LIMIT
  425.              #       Phase "????"
  426. ????   0.000 ✔       (true (from-cable depth-4-stream))
  427. ????   0.000 ✔       (fail (from-cable depth-5-stream) depth-limit-hit)
  428.        0.007 ✔     GATEWAY.CABLE/TEST::CABLE-DEPTH-LIMIT
  429.              ？     GATEWAY.CABLE/TEST::CABLE-READ-LIMIT
  430. ????   0.000 ✔       (true (from-cable (make-string-input-stream string)))
  431. ????   0.000 ✔       (true (from-cable (make-string-input-stream string)))
  432. ????   0.000 ✔       (true (from-cable (make-string-input-stream string)))
  433. ????   0.000 ✔       (fail (from-cable (make-string-input-stream string)) read-limit-hit)
  434. ????   0.000 ✔       (fail (from-cable (make-string-input-stream string)) read-limit-hit)
  435. ????   0.000 ✔       (fail (from-cable (make-string-input-stream string)) read-limit-hit)
  436.        0.008 ✔     GATEWAY.CABLE/TEST::CABLE-READ-LIMIT
  437.              ？     GATEWAY.CABLE/TEST::CABLE-BUFFERED-INPUT
  438. ????   0.001 ✔       (true (null (from-cable-buffered pipe)))
  439. ????   0.000 ✔       (is equal expected (from-cable-buffered pipe))
  440. ????   0.000 ✔       (true (null (from-cable-buffered pipe)))
  441. ????   0.000 ✔       (is equal expected (from-cable-buffered pipe))
  442.        0.012 ✔     GATEWAY.CABLE/TEST::CABLE-BUFFERED-INPUT
  443.              ？     GATEWAY.CABLE/TEST::FROM-CABLE
  444. ????   0.000 ✔       (is cable-equal result *input-sexp*)
  445.        0.004 ✔     GATEWAY.CABLE/TEST::FROM-CABLE
  446.              ？     GATEWAY.CABLE/TEST::TO-CABLE
  447. ????   0.000 ✔       (is string= result *input-string*)
  448.        0.004 ✔     GATEWAY.CABLE/TEST::TO-CABLE
  449.              ？     GATEWAY.CABLE/TEST::CABLE-BUFFER
  450. ????   0.000 ✔       (is = 0 (hash-table-count *stream-buffers*))
  451.        0.003 ✔     GATEWAY.CABLE/TEST::CABLE-BUFFER
  452.              ？     GATEWAY.CABLE/TEST::CABLE-EQUAL
  453. ????   0.000 ✔       (is cable-equal 'foo :foo)
  454. ????   0.000 ✔       (is cable-equal data data)
  455.       0.008 ✔     GATEWAY.CABLE/TEST::CABLE-EQUAL
  456.       0.047 ✔   GATEWAY.CABLE/TEST::CABLE
  457.             ？   GATEWAY.BASE/TEST::BASE
  458.             ？     GATEWAY.BASE/TEST::DATA-OBJECT
  459.             ？       GATEWAY.BASE/TEST::DATA-OBJECT-ALL-OBJECTS
  460.             #         Phase :PRECONDITION
  461.   1   0.004 ✔         (false (data-object-untested-classes))
  462.             #         Phase :ASSERT
  463.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  464.   6   0.000 ✔         (is cable-equal data new-data)
  465.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  466.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  467.   6   0.000 ✔         (is cable-equal data new-data)
  468.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  469.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  470.   6   0.000 ✔         (is cable-equal data new-data)
  471.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  472.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  473.   6   0.000 ✔         (is cable-equal data new-data)
  474.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  475.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  476.   6   0.000 ✔         (is cable-equal data new-data)
  477.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  478.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  479.   6   0.000 ✔         (is cable-equal data new-data)
  480.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  481.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  482.   6   0.000 ✔         (is cable-equal data new-data)
  483.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  484.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  485.   6   0.000 ✔         (is cable-equal data new-data)
  486.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  487.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  488.   6   0.000 ✔         (is cable-equal data new-data)
  489.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  490.   5   0.000 ✔         (is eql (class-of object) (class-of new-object))
  491.   6   0.000 ✔         (is cable-equal data new-data)
  492.   7   0.000 ✔         (is cable-equal new-data new-new-data)
  493.       0.032 ✔       GATEWAY.BASE/TEST::DATA-OBJECT-ALL-OBJECTS
  494.       0.033 ✔     GATEWAY.BASE/TEST::DATA-OBJECT
  495.       0.033 ✔   GATEWAY.BASE/TEST::BASE
  496.      65.845 ✘ GATEWAY.INIT::GATEWAY-FULL-TEST
  497.  
  498. ;; Summary:
  499. Passed:   131
  500. Failed:    65
  501. Skipped:    0
  502.  
  503. ;; Failures:
  504.   2/   5 tests failed in GATEWAY.INIT::GATEWAY-FULL-TEST
  505.   3/   3 tests failed in GATEWAY.SQL/TEST::SQL
  506.  
  507.   2/   5 tests failed in GATEWAY.CONNECTOR/TEST::CONNECTOR
  508.  
  509.   3/   3 tests failed in GATEWAY.SQL/TEST::SQL
  510.   6/   6 tests failed in GATEWAY.SQL/TEST::SQL-NEGATIVE
  511.  
  512.   6/   6 tests failed in GATEWAY.SQL/TEST::SQL-POSITIVE
  513.  
  514.   0/   0 tests failed in GATEWAY.SQL/TEST::SQL-SELECT-DUMMY
  515.  
  516.   6/   6 tests failed in GATEWAY.SQL/TEST::SQL-NEGATIVE
  517.   0/   0 tests failed in GATEWAY.SQL/TEST::TIMELINE-NEGATIVE
  518.  
  519.   0/   0 tests failed in GATEWAY.SQL/TEST::PERSONAS-NEGATIVE
  520.  
  521.   0/   0 tests failed in GATEWAY.SQL/TEST::PERSONA-NEGATIVE
  522.  
  523.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYERS-GROUPS-NEGATIVE
  524.  
  525.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYER-GROUP-NEGATIVE
  526.  
  527.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYER-NEGATIVE
  528.  
  529.   0/   0 tests failed in GATEWAY.SQL/TEST::TIMELINE-NEGATIVE
  530.   0/   0 tests failed in GATEWAY.SQL/TEST::PERSONAS-NEGATIVE
  531.   0/   0 tests failed in GATEWAY.SQL/TEST::PERSONA-NEGATIVE
  532.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYERS-GROUPS-NEGATIVE
  533.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYER-GROUP-NEGATIVE
  534.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYER-NEGATIVE
  535.   6/   6 tests failed in GATEWAY.SQL/TEST::SQL-POSITIVE
  536.   0/   0 tests failed in GATEWAY.SQL/TEST::TIMELINE-POSITIVE
  537.  
  538.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYERS-PERSONAS-POSITIVE
  539.  
  540.   0/   0 tests failed in GATEWAY.SQL/TEST::PERSONA-POSITIVE
  541.  
  542.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYERS-GROUPS-POSITIVE
  543.  
  544.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYER-GROUP-POSITIVE
  545.  
  546.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYER-POSITIVE
  547.  
  548.   0/   0 tests failed in GATEWAY.SQL/TEST::TIMELINE-POSITIVE
  549.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYERS-PERSONAS-POSITIVE
  550.   0/   0 tests failed in GATEWAY.SQL/TEST::PERSONA-POSITIVE
  551.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYERS-GROUPS-POSITIVE
  552.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYER-GROUP-POSITIVE
  553.   0/   0 tests failed in GATEWAY.SQL/TEST::PLAYER-POSITIVE
  554.   0/   0 tests failed in GATEWAY.SQL/TEST::SQL-SELECT-DUMMY
  555.   2/   5 tests failed in GATEWAY.CONNECTOR/TEST::CONNECTOR
  556.   1/   2 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR
  557.  
  558.   3/   3 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER
  559.  
  560.   1/   2 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR
  561.  30/  30 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR-ECHO
  562.  
  563.  30/  30 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR-ECHO
  564. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  565. The test form   (wait () (cable-equal data (connection-receive conn)))
  566. evaluated to    ()
  567. when            t
  568. was expected to be equal under GEQ.
  569. Assert that the data was echoed back on the connection.
  570.  
  571. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  572. The test form   (wait () (cable-equal data (connection-receive conn)))
  573. evaluated to    ()
  574. when            t
  575. was expected to be equal under GEQ.
  576. Assert that the data was echoed back on the connection.
  577.  
  578. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  579. The test form   (wait () (cable-equal data (connection-receive conn)))
  580. evaluated to    ()
  581. when            t
  582. was expected to be equal under GEQ.
  583. Assert that the data was echoed back on the connection.
  584.  
  585. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  586. The test form   (wait () (cable-equal data (connection-receive conn)))
  587. evaluated to    ()
  588. when            t
  589. was expected to be equal under GEQ.
  590. Assert that the data was echoed back on the connection.
  591.  
  592. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  593. The test form   (wait () (cable-equal data (connection-receive conn)))
  594. evaluated to    ()
  595. when            t
  596. was expected to be equal under GEQ.
  597. Assert that the data was echoed back on the connection.
  598.  
  599. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  600. The test form   (wait () (cable-equal data (connection-receive conn)))
  601. evaluated to    ()
  602. when            t
  603. was expected to be equal under GEQ.
  604. Assert that the data was echoed back on the connection.
  605.  
  606. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  607. The test form   (wait () (cable-equal data (connection-receive conn)))
  608. evaluated to    ()
  609. when            t
  610. was expected to be equal under GEQ.
  611. Assert that the data was echoed back on the connection.
  612.  
  613. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  614. The test form   (wait () (cable-equal data (connection-receive conn)))
  615. evaluated to    ()
  616. when            t
  617. was expected to be equal under GEQ.
  618. Assert that the data was echoed back on the connection.
  619.  
  620. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  621. The test form   (wait () (cable-equal data (connection-receive conn)))
  622. evaluated to    ()
  623. when            t
  624. was expected to be equal under GEQ.
  625. Assert that the data was echoed back on the connection.
  626.  
  627. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  628. The test form   (wait () (cable-equal data (connection-receive conn)))
  629. evaluated to    ()
  630. when            t
  631. was expected to be equal under GEQ.
  632. Assert that the data was echoed back on the connection.
  633.  
  634. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  635. The test form   (wait () (cable-equal data (connection-receive conn)))
  636. evaluated to    ()
  637. when            t
  638. was expected to be equal under GEQ.
  639. Assert that the data was echoed back on the connection.
  640.  
  641. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  642. The test form   (wait () (cable-equal data (connection-receive conn)))
  643. evaluated to    ()
  644. when            t
  645. was expected to be equal under GEQ.
  646. Assert that the data was echoed back on the connection.
  647.  
  648. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  649. The test form   (wait () (cable-equal data (connection-receive conn)))
  650. evaluated to    ()
  651. when            t
  652. was expected to be equal under GEQ.
  653. Assert that the data was echoed back on the connection.
  654.  
  655. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  656. The test form   (wait () (cable-equal data (connection-receive conn)))
  657. evaluated to    ()
  658. when            t
  659. was expected to be equal under GEQ.
  660. Assert that the data was echoed back on the connection.
  661.  
  662. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  663. The test form   (wait () (cable-equal data (connection-receive conn)))
  664. evaluated to    ()
  665. when            t
  666. was expected to be equal under GEQ.
  667. Assert that the data was echoed back on the connection.
  668.  
  669. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  670. The test form   (wait () (cable-equal data (connection-receive conn)))
  671. evaluated to    ()
  672. when            t
  673. was expected to be equal under GEQ.
  674. Assert that the data was echoed back on the connection.
  675.  
  676. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  677. The test form   (wait () (cable-equal data (connection-receive conn)))
  678. evaluated to    ()
  679. when            t
  680. was expected to be equal under GEQ.
  681. Assert that the data was echoed back on the connection.
  682.  
  683. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  684. The test form   (wait () (cable-equal data (connection-receive conn)))
  685. evaluated to    ()
  686. when            t
  687. was expected to be equal under GEQ.
  688. Assert that the data was echoed back on the connection.
  689.  
  690. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  691. The test form   (wait () (cable-equal data (connection-receive conn)))
  692. evaluated to    ()
  693. when            t
  694. was expected to be equal under GEQ.
  695. Assert that the data was echoed back on the connection.
  696.  
  697. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  698. The test form   (wait () (cable-equal data (connection-receive conn)))
  699. evaluated to    ()
  700. when            t
  701. was expected to be equal under GEQ.
  702. Assert that the data was echoed back on the connection.
  703.  
  704. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  705. The test form   (wait () (cable-equal data (connection-receive conn)))
  706. evaluated to    ()
  707. when            t
  708. was expected to be equal under GEQ.
  709. Assert that the data was echoed back on the connection.
  710.  
  711. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  712. The test form   (wait () (cable-equal data (connection-receive conn)))
  713. evaluated to    ()
  714. when            t
  715. was expected to be equal under GEQ.
  716. Assert that the data was echoed back on the connection.
  717.  
  718. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  719. The test form   (wait () (cable-equal data (connection-receive conn)))
  720. evaluated to    ()
  721. when            t
  722. was expected to be equal under GEQ.
  723. Assert that the data was echoed back on the connection.
  724.  
  725. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  726. The test form   (wait () (cable-equal data (connection-receive conn)))
  727. evaluated to    ()
  728. when            t
  729. was expected to be equal under GEQ.
  730. Assert that the data was echoed back on the connection.
  731.  
  732. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  733. The test form   (wait () (cable-equal data (connection-receive conn)))
  734. evaluated to    ()
  735. when            t
  736. was expected to be equal under GEQ.
  737. Assert that the data was echoed back on the connection.
  738.  
  739. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  740. The test form   (wait () (cable-equal data (connection-receive conn)))
  741. evaluated to    ()
  742. when            t
  743. was expected to be equal under GEQ.
  744. Assert that the data was echoed back on the connection.
  745.  
  746. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  747. The test form   (wait () (cable-equal data (connection-receive conn)))
  748. evaluated to    ()
  749. when            t
  750. was expected to be equal under GEQ.
  751. Assert that the data was echoed back on the connection.
  752.  
  753. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  754. The test form   (wait () (cable-equal data (connection-receive conn)))
  755. evaluated to    ()
  756. when            t
  757. was expected to be equal under GEQ.
  758. Assert that the data was echoed back on the connection.
  759.  
  760. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  761. The test form   (wait () (cable-equal data (connection-receive conn)))
  762. evaluated to    ()
  763. when            t
  764. was expected to be equal under GEQ.
  765. Assert that the data was echoed back on the connection.
  766.  
  767. In test case STANDARD-CONNECTOR-ECHO, phase ASSERT, step 4:
  768. The test form   (wait () (cable-equal data (connection-receive conn)))
  769. evaluated to    ()
  770. when            t
  771. was expected to be equal under GEQ.
  772. Assert that the data was echoed back on the connection.
  773.  
  774.   3/   3 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER
  775.   3/   3 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-INVALID-INPUT
  776.  
  777.  30/  30 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-MESSAGE
  778.  
  779.   2/   5 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-DEAD-CONNECTION
  780.  
  781.   3/   3 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-INVALID-INPUT
  782. In test case STANDARD-LISTENER-INVALID-INPUT, phase ASSERT, step 6:
  783. The test form   (wait () flag)
  784. evaluated to    ()
  785. when            t
  786. was expected to be equal under GEQ.
  787. Assert the message callback was called.
  788.  
  789. In test case STANDARD-LISTENER-INVALID-INPUT, phase ASSERT, step 6:
  790. The test form   (wait () flag)
  791. evaluated to    ()
  792. when            t
  793. was expected to be equal under GEQ.
  794. Assert the message callback was called.
  795.  
  796. In test case STANDARD-LISTENER-INVALID-INPUT, phase ASSERT, step 6:
  797. The test form   (wait () flag)
  798. evaluated to    ()
  799. when            t
  800. was expected to be equal under GEQ.
  801. Assert the message callback was called.
  802.  
  803.  30/  30 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-MESSAGE
  804. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  805. The test form   (wait () (funcall test-fn data))
  806. evaluated to    ()
  807. when            t
  808. was expected to be equal under GEQ.
  809. Assert the message was pushed onto the list.
  810.  
  811. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  812. The test form   (wait () (funcall test-fn data))
  813. evaluated to    ()
  814. when            t
  815. was expected to be equal under GEQ.
  816. Assert the message was pushed onto the list.
  817.  
  818. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  819. The test form   (wait () (funcall test-fn data))
  820. evaluated to    ()
  821. when            t
  822. was expected to be equal under GEQ.
  823. Assert the message was pushed onto the list.
  824.  
  825. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  826. The test form   (wait () (funcall test-fn data))
  827. evaluated to    ()
  828. when            t
  829. was expected to be equal under GEQ.
  830. Assert the message was pushed onto the list.
  831.  
  832. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  833. The test form   (wait () (funcall test-fn data))
  834. evaluated to    ()
  835. when            t
  836. was expected to be equal under GEQ.
  837. Assert the message was pushed onto the list.
  838.  
  839. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  840. The test form   (wait () (funcall test-fn data))
  841. evaluated to    ()
  842. when            t
  843. was expected to be equal under GEQ.
  844. Assert the message was pushed onto the list.
  845.  
  846. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  847. The test form   (wait () (funcall test-fn data))
  848. evaluated to    ()
  849. when            t
  850. was expected to be equal under GEQ.
  851. Assert the message was pushed onto the list.
  852.  
  853. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  854. The test form   (wait () (funcall test-fn data))
  855. evaluated to    ()
  856. when            t
  857. was expected to be equal under GEQ.
  858. Assert the message was pushed onto the list.
  859.  
  860. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  861. The test form   (wait () (funcall test-fn data))
  862. evaluated to    ()
  863. when            t
  864. was expected to be equal under GEQ.
  865. Assert the message was pushed onto the list.
  866.  
  867. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  868. The test form   (wait () (funcall test-fn data))
  869. evaluated to    ()
  870. when            t
  871. was expected to be equal under GEQ.
  872. Assert the message was pushed onto the list.
  873.  
  874. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  875. The test form   (wait () (funcall test-fn data))
  876. evaluated to    ()
  877. when            t
  878. was expected to be equal under GEQ.
  879. Assert the message was pushed onto the list.
  880.  
  881. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  882. The test form   (wait () (funcall test-fn data))
  883. evaluated to    ()
  884. when            t
  885. was expected to be equal under GEQ.
  886. Assert the message was pushed onto the list.
  887.  
  888. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  889. The test form   (wait () (funcall test-fn data))
  890. evaluated to    ()
  891. when            t
  892. was expected to be equal under GEQ.
  893. Assert the message was pushed onto the list.
  894.  
  895. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  896. The test form   (wait () (funcall test-fn data))
  897. evaluated to    ()
  898. when            t
  899. was expected to be equal under GEQ.
  900. Assert the message was pushed onto the list.
  901.  
  902. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  903. The test form   (wait () (funcall test-fn data))
  904. evaluated to    ()
  905. when            t
  906. was expected to be equal under GEQ.
  907. Assert the message was pushed onto the list.
  908.  
  909. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  910. The test form   (wait () (funcall test-fn data))
  911. evaluated to    ()
  912. when            t
  913. was expected to be equal under GEQ.
  914. Assert the message was pushed onto the list.
  915.  
  916. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  917. The test form   (wait () (funcall test-fn data))
  918. evaluated to    ()
  919. when            t
  920. was expected to be equal under GEQ.
  921. Assert the message was pushed onto the list.
  922.  
  923. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  924. The test form   (wait () (funcall test-fn data))
  925. evaluated to    ()
  926. when            t
  927. was expected to be equal under GEQ.
  928. Assert the message was pushed onto the list.
  929.  
  930. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  931. The test form   (wait () (funcall test-fn data))
  932. evaluated to    ()
  933. when            t
  934. was expected to be equal under GEQ.
  935. Assert the message was pushed onto the list.
  936.  
  937. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  938. The test form   (wait () (funcall test-fn data))
  939. evaluated to    ()
  940. when            t
  941. was expected to be equal under GEQ.
  942. Assert the message was pushed onto the list.
  943.  
  944. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  945. The test form   (wait () (funcall test-fn data))
  946. evaluated to    ()
  947. when            t
  948. was expected to be equal under GEQ.
  949. Assert the message was pushed onto the list.
  950.  
  951. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  952. The test form   (wait () (funcall test-fn data))
  953. evaluated to    ()
  954. when            t
  955. was expected to be equal under GEQ.
  956. Assert the message was pushed onto the list.
  957.  
  958. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  959. The test form   (wait () (funcall test-fn data))
  960. evaluated to    ()
  961. when            t
  962. was expected to be equal under GEQ.
  963. Assert the message was pushed onto the list.
  964.  
  965. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  966. The test form   (wait () (funcall test-fn data))
  967. evaluated to    ()
  968. when            t
  969. was expected to be equal under GEQ.
  970. Assert the message was pushed onto the list.
  971.  
  972. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  973. The test form   (wait () (funcall test-fn data))
  974. evaluated to    ()
  975. when            t
  976. was expected to be equal under GEQ.
  977. Assert the message was pushed onto the list.
  978.  
  979. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  980. The test form   (wait () (funcall test-fn data))
  981. evaluated to    ()
  982. when            t
  983. was expected to be equal under GEQ.
  984. Assert the message was pushed onto the list.
  985.  
  986. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  987. The test form   (wait () (funcall test-fn data))
  988. evaluated to    ()
  989. when            t
  990. was expected to be equal under GEQ.
  991. Assert the message was pushed onto the list.
  992.  
  993. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  994. The test form   (wait () (funcall test-fn data))
  995. evaluated to    ()
  996. when            t
  997. was expected to be equal under GEQ.
  998. Assert the message was pushed onto the list.
  999.  
  1000. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  1001. The test form   (wait () (funcall test-fn data))
  1002. evaluated to    ()
  1003. when            t
  1004. was expected to be equal under GEQ.
  1005. Assert the message was pushed onto the list.
  1006.  
  1007. In test case STANDARD-LISTENER-MESSAGE, phase ASSERT, step 7:
  1008. The test form   (wait () (funcall test-fn data))
  1009. evaluated to    ()
  1010. when            t
  1011. was expected to be equal under GEQ.
  1012. Assert the message was pushed onto the list.
  1013.  
  1014.   2/   5 tests failed in GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-DEAD-CONNECTION
  1015. In test case STANDARD-LISTENER-DEAD-CONNECTION, phase ASSERT, step 7:
  1016. The test form   (wait () (= 0 (connection-count listener)))
  1017. evaluated to    ()
  1018. when            t
  1019. was expected to be equal under GEQ.
  1020. Assert the listener's connection list contains only one element.
  1021.  
  1022. In test case STANDARD-LISTENER-DEAD-CONNECTION, phase ASSERT, step 9:
  1023. The test form   flag
  1024. evaluated to    ()
  1025. when            t
  1026. was expected to be equal under GEQ.
  1027. Assert the listener's disconnection handler has been called.
  1028.  
  1029. While evaluating the form starting at line 32, column 0
  1030.  of #P"/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/main.lisp":
  1031.  
  1032. debugger invoked on a SIMPLE-ERROR in thread
  1033. #<THREAD "main thread" RUNNING {10005D05B3}>:
  1034.  There are test failures:
  1035. #<TEST-RESULT :FAILED GATEWAY.INIT::GATEWAY-FULL-TEST>
  1036. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::SQL>
  1037. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::SQL-NEGATIVE>
  1038. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::TIMELINE-NEGATIVE>
  1039. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PERSONAS-NEGATIVE>
  1040. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PERSONA-NEGATIVE>
  1041. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PLAYERS-GROUPS-NEGATIVE>
  1042. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PLAYER-GROUP-NEGATIVE>
  1043. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PLAYER-NEGATIVE>
  1044. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::SQL-POSITIVE>
  1045. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::TIMELINE-POSITIVE>
  1046. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PLAYERS-PERSONAS-POSITIVE>
  1047. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PERSONA-POSITIVE>
  1048. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PLAYERS-GROUPS-POSITIVE>
  1049. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PLAYER-GROUP-POSITIVE>
  1050. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::PLAYER-POSITIVE>
  1051. #<TEST-RESULT :FAILED GATEWAY.SQL/TEST::SQL-SELECT-DUMMY>
  1052. #<TEST-RESULT :FAILED GATEWAY.CONNECTOR/TEST::CONNECTOR>
  1053. #<TEST-RESULT :FAILED GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR>
  1054. #<TEST-RESULT :FAILED GATEWAY.CONNECTOR/TEST::STANDARD-CONNECTOR-ECHO>
  1055. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1056. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1057. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1058. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1059. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1060. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1061. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1062. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1063. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1064. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1065. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1066. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1067. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1068. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1069. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1070. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1071. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1072. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1073. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1074. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1075. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1076. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1077. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1078. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1079. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1080. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1081. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1082. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1083. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1084. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (cable-equal data (connection-receive conn))))>
  1085. #<TEST-RESULT :FAILED GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER>
  1086. #<TEST-RESULT :FAILED GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-INVALID-INPUT>
  1087. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () flag))>
  1088. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () flag))>
  1089. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () flag))>
  1090. #<TEST-RESULT :FAILED GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-MESSAGE>
  1091. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1092. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1093. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1094. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1095. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1096. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1097. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1098. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1099. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1100. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1101. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1102. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1103. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1104. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1105. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1106. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1107. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1108. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1109. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1110. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1111. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1112. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1113. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1114. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1115. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1116. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1117. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1118. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1119. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1120. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (funcall test-fn data)))>
  1121. #<TEST-RESULT :FAILED GATEWAY.CONNECTOR/TEST::STANDARD-LISTENER-DEAD-CONNECTION>
  1122. #<TEST-CASE-COMPARISON-RESULT :FAILED (true (wait () (= 0 (connection-count listener))))>
  1123. #<TEST-CASE-COMPARISON-RESULT :FAILED (true flag)>
  1124.  
  1125. Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
  1126.  
  1127. restarts (invokable by number or by possibly-abbreviated name):
  1128.  0: [CONTINUE] Continue.
  1129.  1: [RETRY   ] Retry EVAL of current toplevel form.
  1130.  2:            Ignore error and continue loading file "/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/main.lisp".
  1131.  3: [ABORT   ] Abort loading file "/mnt/gggg/opt/CYC_JRTL_with_CommonLisp/platform/site-lisp/Gateway/src/main.lisp".
  1132.  4:            Ignore runtime option --load "main".
  1133.  5:            Skip rest of --eval and --load options.
  1134.  6:            Skip to toplevel READ/EVAL/PRINT loop.
  1135.  7: [EXIT    ] Exit SBCL (calling #'EXIT, killing the process).
  1136.  
  1137. (TEST-GATEWAY)
  1138.    source: (CERROR "Continue." "There are test failures: ~{~%~A~}" FAILED)
  1139. 0] 4
  1140. *
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!