diff options
| author | Artyom V. Poptsov <poptsov.artyom@gmail.com> | 2017-01-04 11:22:49 +0300 |
|---|---|---|
| committer | Artyom V. Poptsov <poptsov.artyom@gmail.com> | 2017-01-04 11:22:49 +0300 |
| commit | 633aa1dcb5fd533365b8f624f47f548a01ce9aa4 (patch) | |
| tree | 053b5a0f0a0163119771c771ed919635c8425c02 /tests | |
| parent | NEWS: Update (diff) | |
| download | guile-ssh-633aa1dcb5fd533365b8f624f47f548a01ce9aa4.tar.gz | |
tests/dist.scm ("with-ssh"): Wait for the client process
* tests/dist.scm ("with-ssh"): Wait for the client process to read the
response.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/dist.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/dist.scm b/tests/dist.scm index 755d3c1..88df35c 100644 --- a/tests/dist.scm +++ b/tests/dist.scm @@ -201,8 +201,8 @@ (error "Wrong result 2" result))) (write-line "scheme@(guile-user)> $1 = 42\n" c) - - (sleep 60))))) + (while #t + (sleep 60)))))) (else (message-reply-success msg))))))) ;; Client |