# Pastebin IWQJSayk * (load "cando-kernel.lisp") About to load quicklisp:setup.lisp About to quickload pzmq To load "pzmq": Load 1 ASDF system: pzmq ; Loading "pzmq" ; file: /Users/meister/Test/cando-kernel.lisp ; in: DEFMACRO LOGG ; (DEFMACRO LOGG (IDX FMT &REST ARGS) `(FORMAT T ,FMT ,@ARGS)) ; --> SB-INT:NAMED-DS-BIND SB-INT:BINDING* ; ==> ; (LET* ((#:G0 ; (SB-C::CHECK-DS-LIST/&REST (CDR #:EXPR) 2 2 '(# IDX FMT &REST ARGS))) ; (IDX (POP #:G0)) ; (FMT (POP #:G0)) ; (ARGS #:G0)) ; (BLOCK LOGG `(FORMAT T ,FMT ,@ARGS))) ; ; caught STYLE-WARNING: ; The variable IDX is defined but never used. ; ; compilation unit finished ; caught 1 STYLE-WARNING condition address -> "tcp://127.0.0.1:9734" type-of address -> (SIMPLE-BASE-STRING 20) (pzmq:getsockopt worker :identity) -> "" About to wait for message-recv =============== message-recv ============== recv (pzmq:getsockopt socket :type) -> :ROUTER recv (pzmq:getsockopt socket :identity) -> "" (length parts) -> 3 parts -> (#(0 214 243 47 67) "" "RRRRRRRRRequest") delim-index -> 1 parts -> (#(0 214 243 47 67) "" "RRRRRRRRRequest") identities: (#(0 214 243 47 67)) msg: ("RRRRRRRRRequest") Sending response-msg: ("reSSSSSSSSSSsponse" "RRRRRRRRRequest") in message-send (length wire-parts) -> 4 send wire-parts-> (#(0 214 243 47 67) "" "reSSSSSSSSSSsponse" "RRRRRRRRRequest") send (pzmq:getsockopt socket :type) -> :ROUTER send (pzmq:getsockopt socket :identity) -> "" message-send (array (unsigned-byte 8)): (0 214 243 47 67) message-send string: "" message-send string: "reSSSSSSSSSSsponse" message-send string: "RRRRRRRRRequest" T *