diff options
author | Ludovic Courtès <ludo@gnu.org> | 2010-02-15 00:43:20 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2010-02-15 00:43:20 +0100 |
commit | 2fe5eb561c02ceda6e9244e14c68b2072fb94eb5 (patch) | |
tree | 8c27130216cb893c2363cef68b01ca9e3651f73c | |
parent | 40ff484d80ef3bf3706262e6fcc5178e8239f60d (diff) | |
download | guile-2fe5eb561c02ceda6e9244e14c68b2072fb94eb5.tar.gz |
Make the `getaddrinfo' "no name" test more robust.
* test-suite/tests/net-db.test ("getaddrinfo")["no name"]: Check for
`EAI_EAGAIN' too.
-rw-r--r-- | test-suite/tests/net-db.test | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/test-suite/tests/net-db.test b/test-suite/tests/net-db.test index e1f7c083e..23a534d9a 100644 --- a/test-suite/tests/net-db.test +++ b/test-suite/tests/net-db.test @@ -61,7 +61,10 @@ (getaddrinfo "does-not-exist") #f) (lambda (key errcode) - (and (= errcode EAI_NONAME) + ;; In some cases (e.g., in a chroot without + ;; /etc/{hosts,resolv.conf}), this can result in `EAI_EAGAIN'. + (and (or (= errcode EAI_NONAME) + (= errcode EAI_AGAIN)) (string? (gai-strerror errcode)))))) (pass-if "wrong service name" |