bug#33409: guile-ssh build fail when run guix pull

[Feng Shu]

```
Some deprecated features have been used.  Set the environment
variable GUILE_WARN_DEPRECATED to "detailed" and rerun the
program to get more information.  Set it to "no" to suppress
this message.
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/tests'
make[1]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3'
make[1]: Nothing to be done for 'all-am'.
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3'
phase `build' succeeded after 30.8 seconds
starting phase `check'
Making check in am
make[1]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/am'
make[1]: Nothing to be done for 'check'.
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/am'
Making check in libguile-ssh
make[1]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/libguile-ssh'
make  check-am
make[2]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/libguile-ssh'
make[2]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/libguile-ssh'
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/libguile-ssh'
Making check in examples
make[1]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/examples'
make[1]: Nothing to be done for 'check'.
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/examples'
Making check in build-aux
make[1]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/build-aux'
make[1]: Nothing to be done for 'check'.
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/build-aux'
Making check in m4
make[1]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/m4'
make[1]: Nothing to be done for 'check'.
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/m4'
Making check in doc
make[1]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/doc'
make[1]: Nothing to be done for 'check'.
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/doc'
Making check in modules
make[1]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules'
Making check in ssh
make[2]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules/ssh'
Making check in dist
make[3]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules/ssh/dist'
make[3]: Nothing to be done for 'check'.
make[3]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules/ssh/dist'
make[3]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules/ssh'
make[3]: Nothing to be done for 'check-am'.
make[3]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules/ssh'
make[2]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules/ssh'
Making check in srfi
make[2]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules/srfi'
make[2]: Nothing to be done for 'check'.
make[2]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules/srfi'
make[2]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules'
make[2]: Nothing to be done for 'check-am'.
make[2]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules'
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/modules'
Making check in tests
make[1]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/tests'
make  check-TESTS
make[2]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/tests'
make[3]: Entering directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/tests'
|PASS: log.scm
PASS: server.scm
/PASS: session.scm
-PASS: client-server.scm
/PASS: popen.scm
|PASS: shell.scm
|PASS: server-client.scm
\PASS: sssh-ssshd.scm
|PASS: key.scm
|PASS: tunnel.scm
-FAIL: dist.scm
============================================================================
Testsuite summary for Guile-SSH 0.11.3
============================================================================
# TOTAL: 11
# PASS:  10
# SKIP:  0
# XFAIL: 0
# FAIL:  1
# XPASS: 0
# ERROR: 0
============================================================================
See tests/test-suite.log
Please report to address@hidden
============================================================================
make[3]: *** [Makefile:653: test-suite.log] Error 1
make[3]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/tests'
make[2]: *** [Makefile:761: check-TESTS] Error 2
make[2]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/tests'
make[1]: *** [Makefile:827: check-am] Error 2
make[1]: Leaving directory 
'/tmp/guix-build-guile-ssh-0.11.3.drv-0/guile-ssh-0.11.3/tests'
make: *** [Makefile:411: check-recursive] Error 1

Test suite failed, dumping logs.

--- ./tests/test-suite.log --------------------------------------------------

============================================
   Guile-SSH 0.11.3: tests/test-suite.log
============================================

# TOTAL: 11
# PASS:  10
# SKIP:  0
# XFAIL: 0
# FAIL:  1
# XPASS: 0
# ERROR: 0

.. contents:: :depth: 2

FAIL: dist
==========

;;; note: source file ../modules/srfi/srfi-64.scm
;;;       newer than compiled 
/gnu/store/05jfn0ib0lfmnv3b9jqgqms70rc1r19l-guile-2.2.3/lib/guile/2.2/ccache/srfi/srfi-64.go
%%%% Starting test dist  (Writing full log to "dist.log")
FAIL with-ssh
# of expected passes      18
# of unexpected failures  1

Some deprecated features have been used.  Set the environment
variable GUILE_WARN_DEPRECATED to "detailed" and rerun the
program to get more information.  Set it to "no" to suppress
this message.
job-node"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "hand-out-job, invalid type"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "assign-eval"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-get-result"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-get-result, unspecified"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-get-result, error"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-get-result, compilation error"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-get-result, unbound variable error"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-get-result, unknown # object error"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-get-result, elisp"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-get-result, multiple values"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-skip-to-prompt, valid input"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "rrepl-skip-to-prompt, invalid input"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "node-guile-version, valid response"
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  test-name: "with-ssh"
Test end:
  result-kind: fail
  actual-value: #f
Group end: dist
# of expected passes      18
# of unexpected failures  1
FAIL dist.scm (exit status: 1)


Backtrace:
           4 (primitive-load "/gnu/store/rms9l2phw4nibx8rrxl6shdmig6…")
In ice-9/eval.scm:
   191:35  3 (_ _)
In srfi/srfi-1.scm:
    640:9  2 (for-each #<procedure 81cf2b0 at /gnu/store/cgnrsi20mw…> …)
In 
/gnu/store/cgnrsi20mwcm1s3z9ab8qw125m73l4qd-module-import/guix/build/gnu-build-system.scm:
   799:31  1 (_ _)
    369:6  0 (check #:target _ #:make-flags _ #:tests? _ # _ # _ # _)

/gnu/store/cgnrsi20mwcm1s3z9ab8qw125m73l4qd-module-import/guix/build/gnu-build-system.scm:369:6:
 In procedure check:
Throw to key `srfi-34' with args `(#<condition &invoke-error [program: "make" 
arguments: ("check") exit-status: 2 term-signal: #f stop-signal: #f] 80a8ee0>)'.
builder for `/gnu/store/lnwp3cinar5yq9fy511wdg29lqwq7aqj-guile-ssh-0.11.3.drv' 
failed with exit code 1
@ build-failed /gnu/store/lnwp3cinar5yq9fy511wdg29lqwq7aqj-guile-ssh-0.11.3.drv 
- 1 builder for 
`/gnu/store/lnwp3cinar5yq9fy511wdg29lqwq7aqj-guile-ssh-0.11.3.drv' failed with 
exit code 1
Backtrace:
In guix/store.scm:
   1532:8 19 (_ _)
In guix/gexp.scm:
    706:2 18 (_ _)
In guix/monads.scm:
    485:9 17 (_ _)
In guix/gexp.scm:
   572:22 16 (_ _)
In guix/store.scm:
   1532:8 15 (_ _)
In guix/gexp.scm:
    706:2 14 (_ _)
In guix/monads.scm:
    485:9 13 (_ _)
In guix/gexp.scm:
   572:22 12 (_ _)
In guix/store.scm:
   1532:8 11 (_ _)
In guix/gexp.scm:
    706:2 10 (_ _)
In guix/monads.scm:
    485:9  9 (_ _)
In guix/gexp.scm:
   572:22  8 (_ _)
In guix/store.scm:
   1532:8  7 (_ _)
  1555:38  6 (_ #<build-daemon 256.97 d190aa0>)
In guix/packages.scm:
   881:14  5 (cache! #<weak-table 471/883> #<package address@hidden> …)
In unknown file:
           4 (_ #<procedure thunk ()> #<procedure list _> #<undefined>)
In guix/grafts.scm:
    304:4  3 (graft-derivation #<build-daemon 256.97 d190aa0> #<der…> …)
    182:4  2 (references-oracle #<build-daemon 256.97 d190aa0> #<der…>)
   191:20  1 (_ _ _)
In guix/store.scm:
  1104:15  0 (_ #<build-daemon 256.97 d190aa0> _ _)

guix/store.scm:1104:15: Throw to key `srfi-34' with args `(#<condition 
&nix-protocol-error [message: "build of 
`/gnu/store/lnwp3cinar5yq9fy511wdg29lqwq7aqj-guile-ssh-0.11.3.drv' failed" 
status: 100] c7e2c30>)'.
guix pull: error: You found a bug: the program 
'/gnu/store/hwrncjaf5yfi37i0pjg0saqx25phm828-compute-guix-derivation'
failed to compute the derivation for Guix (version: 
"0c7707d53e66839a2beae8c05eddc91ac5a6d5e1"; system: "i686-linux";
host version: "3b362c8a8366b55a172817d7c347098accd3d56b"; pull-version: 1).
Please report it by email to <address@hidden>.

```


--