21 lines
943 B
Diff
21 lines
943 B
Diff
|
Index: guile-2.0.7/test-suite/tests/net-db.test
|
||
|
|
===================================================================
|
||
|
|
--- guile-2.0.7.orig/test-suite/tests/net-db.test
|
||
|
|
+++ guile-2.0.7/test-suite/tests/net-db.test
|
||
|
|
@@ -79,6 +79,7 @@
|
||
|
|
(and (defined? 'EAI_NODATA) ; GNU extension
|
||
|
|
(= errcode EAI_NODATA))
|
||
|
|
(= errcode EAI_AGAIN)
|
||
|
|
+ (= errcode EAI_SYSTEM)
|
||
|
|
(begin
|
||
|
|
(format #t "unexpected error code: ~a ~s~%"
|
||
|
|
errcode (gai-strerror errcode))
|
||
|
|
@@ -105,6 +106,7 @@
|
||
|
|
;; `EAI_NONAME'.)
|
||
|
|
(and (or (= errcode EAI_SERVICE)
|
||
|
|
(= errcode EAI_NONAME)
|
||
|
|
+ (= errcode EAI_SYSTEM)
|
||
|
|
(and (defined? 'EAI_NODATA)
|
||
|
|
(= errcode EAI_NODATA)))
|
||
|
|
(string? (gai-strerror errcode))))))))
|