(ssh:with-connection (conn "172.16.31.21" (ssh:pass "my_pc" "my_pass")) (ssh:with-command (conn iostream "ls -a")) )
Libssh2: libssh2_channel_wait_closed() invoked when channel is not in EOF state (ERROR-INVAL)
[Condition of type LIBSSH2:SSH-GENERIC-ERROR]
Backtrace:
0: (LIBSSH2::THROW-LAST-ERROR #.(SB-SYS:INT-SAP #X7FFFDC008320))
Locals:
SB-DEBUG::ARG-0 = #.(SB-SYS:INT-SAP #X7FFFDC008320)
1: ((FLET #:H0 :IN #:DROP-THRU-TAG-6) #)
[No Locals]
2: (SIGNAL #<LIBSSH2::LIBSSH2-INVALID-ERROR-CODE {100417FE13}>)
Locals:
SB-KERNEL::ARGUMENTS = NIL
SB-KERNEL::DATUM = #<LIBSSH2::LIBSSH2-INVALID-ERROR-CODE {100417FE13}>
3: (ERROR LIBSSH2::LIBSSH2-INVALID-ERROR-CODE :CODE :ERROR-INVAL)
Locals:
SB-KERNEL::ARGUMENTS = (:CODE :ERROR-INVAL)
SB-KERNEL::DATUM = LIBSSH2::LIBSSH2-INVALID-ERROR-CODE
4: (LIBSSH2:CHANNEL-WAIT-CLOSED #.(SB-SYS:INT-SAP #X7FFFDC01B050))
Locals:
SB-DEBUG::ARG-0 = #.(SB-SYS:INT-SAP #X7FFFDC01B050)
5: ((:METHOD CLOSE (LIBSSH2:SSH-CHANNEL-STREAM)) #<LIBSSH2:SSH-CHANNEL-EXEC {100417B783}> :ABORT NIL) [fast-method]
Locals:
#:.DEFAULTING-TEMP. = NIL
STREAM = #<LIBSSH2:SSH-CHANNEL-EXEC {100417B783}>
6: ((FLET #:CLEANUP-FUN-14 :IN #:DROP-THRU-TAG-6)) [cleanup]
[No Locals]
7: ((SB-C::TOP-LEVEL-FORM (LET* ((TRIVIAL-SSH::SSH-CONN (LIBSSH2:CREATE-SSH-CONNECTION #1="172.16.31.21" :HOSTS-DB ??? :PORT 22))) (HANDLER-CASE (LIBSSH2:SSH-VERIFY-SESSION TRIVIAL-SSH::SSH-CONN) (LIBSSH..
[No Locals]
8: (SB-FASL::LOAD-FASL-GROUP #S(SB-FASL::FASL-INPUT :STREAM #<SB-SYS:FD-STREAM for "file /tmp/slime3z2YMI.fasl" {1004167DC3}> :TABLE #(170 #<PACKAGE "LIBSSH2"> LIBSSH2:SSH-BAD-HOSTKEY :CREATE #<PACKAGE "..
Locals:
SB-DEBUG::ARG-0 = #S(SB-FASL::FASL-INPUT ..)
SB-DEBUG::ARG-1 = NIL
Catch-tags:
SB-FASL::FASL-GROUP-END
9: (SB-FASL::LOAD-AS-FASL #<SB-SYS:FD-STREAM for "file /tmp/slime3z2YMI.fasl" {1004167DC3}> NIL NIL)
Locals:
SB-DEBUG::ARG-0 = #<SB-SYS:FD-STREAM for "file /tmp/slime3z2YMI.fasl" {1004167DC3}>
SB-DEBUG::ARG-1 = NIL
SB-DEBUG::ARG-2 = NIL
10: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<SB-SYS:FD-STREAM for "file /tmp/slime3z2YMI.fasl" {1004167DC3}> T)
Locals:
SB-DEBUG::ARG-0 = #<SB-SYS:FD-STREAM for "file /tmp/slime3z2YMI.fasl" {1004167DC3}>
SB-DEBUG::ARG-1 = T
11: (LOAD #P"/tmp/slime3z2YMI.fasl" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
Locals:
#:.DEFAULTING-TEMP. = NIL
#:.DEFAULTING-TEMP.#1 = NIL
#:.DEFAULTING-TEMP.#2 = T
#:.DEFAULTING-TEMP.#3 = :DEFAULT
#:N-SUPPLIED-85 = 0
#:N-SUPPLIED-86 = 0
SB-FASL::PATHSPEC = #P"/tmp/slime3z2YMI.fasl"
12: ((FLET SWANK/BACKEND:CALL-WITH-COMPILATION-HOOKS :IN "/home/sharlatan/Projects/contribution-GitHub/emacs.d/elpa/slime-20170421.1423/swank/sbcl.lisp") #<CLOSURE (LAMBDA NIL :IN SWANK/BACKEND:SWANK-COMP..
Locals:
FUNCTION = #<CLOSURE (LAMBDA () :IN SWANK/BACKEND:SWANK-COMPILE-STRING) {1004166F8B}>
13: ((FLET SWANK/BACKEND:SWANK-COMPILE-STRING :IN "/home/sharlatan/Projects/contribution-GitHub/emacs.d/elpa/slime-20170421.1423/swank/sbcl.lisp") "(ssh:with-connection (conn "172.16.31.21" (ssh:pass "..
Locals:
#:.DEFAULTING-TEMP. = "ssh-test.lisp"
#:.DEFAULTING-TEMP.#1 = 1
#:.DEFAULTING-TEMP.#2 = "/home/sharlatan/Projects/hack/Lisp/CommonLisp/ssh-test.lisp"
#:.DEFAULTING-TEMP.#3 = NIL
SWANK/SBCL::FAILUREP = NIL
STRING = "(ssh:with-connection (conn "172.16.31.21" (ssh:pass "misa" "belo4ka8"))\n (ssh:with-command (conn iostream "ls -a"))\n )\n"
14: ((LAMBDA NIL :IN SWANK:COMPILE-STRING-FOR-EMACS))
[No Locals]
15: ((LAMBDA NIL :IN SWANK::COLLECT-NOTES))
[No Locals]
16: (SWANK::MEASURE-TIME-INTERVAL #<CLOSURE (LAMBDA NIL :IN SWANK::COLLECT-NOTES) {10040127BB}>)
Locals:
SB-DEBUG::ARG-0 = #<CLOSURE (LAMBDA () :IN SWANK::COLLECT-NOTES) {10040127BB}>
17: (SWANK::COLLECT-NOTES #<CLOSURE (LAMBDA NIL :IN SWANK:COMPILE-STRING-FOR-EMACS) {100401277B}>)
Locals:
SB-DEBUG::ARG-0 = #<CLOSURE (LAMBDA () :IN SWANK:COMPILE-STRING-FOR-EMACS) {100401277B}>
18: (SWANK::CALL-WITH-BUFFER-SYNTAX NIL #<CLOSURE (LAMBDA NIL :IN SWANK:COMPILE-STRING-FOR-EMACS) {100401273B}>)
Locals:
SB-DEBUG::ARG-0 = NIL
SB-DEBUG::ARG-1 = #<CLOSURE (LAMBDA () :IN SWANK:COMPILE-STRING-FOR-EMACS) {100401273B}>
19: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK:COMPILE-STRING-FOR-EMACS "(ssh:with-connection (conn "172.16.31.21" (ssh:pass "my_pc" "my_path")) ..)
Locals:
SB-DEBUG::ARG-0 = (SWANK:COMPILE-STRING-FOR-EMACS "(ssh:with-connection (conn "172.16.31.21" (ssh:pass "my_pc" "my_path"))\n (ssh:with-command (conn iostream "ls -a"))\n )\n" "ssh-test.lisp" ..)
SB-DEBUG::ARG-1 = #<NULL-LEXENV>
20: (EVAL (SWANK:COMPILE-STRING-FOR-EMACS "(ssh:with-connection (conn "172.16.31.21" (ssh:pass "my_pc" "my_path")) ..)
Locals:
SB-DEBUG::ARG-0 = (SWANK:COMPILE-STRING-FOR-EMACS "(ssh:with-connection (conn "172.16.31.21" (ssh:pass "my_pc" "my_path"))\n (ssh:with-command (conn iostream "ls -a"))\n )\n" "ssh-test.lisp" ..)
21: (SWANK:EVAL-FOR-EMACS (SWANK:COMPILE-STRING-FOR-EMACS "(ssh:with-connection (conn "172.16.31.21" (ssh:pass "my_pc" "my_path")) ..)
Locals:
SB-DEBUG::ARG-0 = (SWANK:COMPILE-STRING-FOR-EMACS "(ssh:with-connection (conn "172.16.31.21" (ssh:pass "my_pc" "my_path"))\n (ssh:with-command (conn iostream "ls -a"))\n )\n" "ssh-test.lisp" ..)
SB-DEBUG::ARG-1 = "COMMON-LISP-USER"
SB-DEBUG::ARG-2 = 45
22: ((LAMBDA NIL :IN SWANK::SPAWN-WORKER-THREAD))
[No Locals]
23: (SWANK/SBCL::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<FUNCTION (LAMBDA NIL :IN SWANK::SPAWN-WORKER-THREAD) {1006F33FBB}>)
Locals:
CONTINUATION = #<FUNCTION (LAMBDA () :IN SWANK::SPAWN-WORKER-THREAD) {1006F33FBB}>
HOOK = #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK>
24: ((FLET SWANK/BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/sharlatan/Projects/contribution-GitHub/emacs.d/elpa/slime-20170421.1423/swank/sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<FUNCTION (LAMB..
Locals:
SWANK/SBCL::FUN = #<FUNCTION (LAMBDA () :IN SWANK::SPAWN-WORKER-THREAD) {1006F33FBB}>
SWANK/SBCL::HOOK = #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK>
25: (SWANK::CALL-WITH-BINDINGS ((STANDARD-INPUT . #1=#<SWANK/GRAY::SLIME-INPUT-STREAM {1006C5F013}>) (STANDARD-OUTPUT . #2=#<SWANK/GRAY::SLIME-OUTPUT-STREAM {1006D30C33}>) (TRACE-OUTPUT . #2#) (*ERR..
Locals:
SB-DEBUG::ARG-0 = ((STANDARD-INPUT . #<SWANK/GRAY::SLIME-INPUT-STREAM {1006C5F013}>) (STANDARD-OUTPUT . #<SWANK/GRAY::SLIME-OUTPUT-STREAM {1006D30C33}>) ..)
SB-DEBUG::ARG-1 = #<FUNCTION (LAMBDA () :IN SWANK::SPAWN-WORKER-THREAD) {1006F342DB}>
26: ((LAMBDA NIL :IN SWANK::SPAWN-WORKER-THREAD))
[No Locals]
27: ((FLET #:WITHOUT-INTERRUPTS-BODY-1114 :IN SB-THREAD::INITIAL-THREAD-FUNCTION-TRAMPOLINE))
[No Locals]
Catch-tags:
SB-THREAD::%RETURN-FROM-THREAD
28: ((FLET SB-THREAD::WITH-MUTEX-THUNK :IN SB-THREAD::INITIAL-THREAD-FUNCTION-TRAMPOLINE))
[No Locals]
Catch-tags:
SB-THREAD::%ABORT-THREAD
SB-IMPL::%END-OF-THE-WORLD
SB-INT:TOPLEVEL-CATCHER
29: ((FLET #:WITHOUT-INTERRUPTS-BODY-359 :IN SB-THREAD::CALL-WITH-MUTEX))
[No Locals]
30: (SB-THREAD::CALL-WITH-MUTEX #<CLOSURE (FLET SB-THREAD::WITH-MUTEX-THUNK :IN SB-THREAD::INITIAL-THREAD-FUNCTION-TRAMPOLINE) {7FFFEBD36D5B}> #<SB-THREAD:MUTEX "thread result lock" owner: #<SB-THREAD:THR..
Locals:
SB-DEBUG::ARG-0 = #<CLOSURE (FLET SB-THREAD::WITH-MUTEX-THUNK :IN SB-THREAD::INITIAL-THREAD-FUNCTION-TRAMPOLINE) {7FFFEBD36D5B}>
SB-DEBUG::ARG-1 = #<SB-THREAD:MUTEX "thread result lock" owner: #<SB-THREAD:THREAD "worker" RUNNING {100400EDF3}>>
SB-DEBUG::ARG-2 = NIL
SB-DEBUG::ARG-3 = T
SB-DEBUG::ARG-4 = NIL
31: (SB-THREAD::INITIAL-THREAD-FUNCTION-TRAMPOLINE #<SB-THREAD:THREAD "worker" RUNNING {100400EDF3}> NIL #<CLOSURE (LAMBDA NIL :IN SWANK::SPAWN-WORKER-THREAD) {100400ED7B}> (#<SB-THREAD:THREAD "worker" RU..
Locals:
SB-DEBUG::ARG-0 = #<SB-THREAD:THREAD "worker" RUNNING {100400EDF3}>
SB-DEBUG::ARG-1 = NIL
SB-DEBUG::ARG-2 = #<CLOSURE (LAMBDA () :IN SWANK::SPAWN-WORKER-THREAD) {100400ED7B}>
SB-DEBUG::ARG-3 = (#<SB-THREAD:THREAD "worker" RUNNING {100400EDF3}> #<SB-THREAD:THREAD "auto-flush-thread" RUNNING {1006D4FDD3}> #<SB-THREAD:THREAD "swank-indentation-cache-thread" RUNNING {10064081D3}> ..)
SB-DEBUG::ARG-4 = NIL
SB-DEBUG::ARG-5 = NIL
SB-DEBUG::ARG-6 = NIL
SB-DEBUG::ARG-7 = NIL
32: ("foreign function: call_into_lisp")
[No Locals]
33: ("foreign function: new_thread_trampoline")
iostream must be processed in the body. Try to read it.