2016-07-21 20:01:41 +00:00
|
|
|
Index: guile-2.0.12/test-suite/tests/net-db.test
|
2012-12-17 12:22:06 +00:00
|
|
|
===================================================================
|
2016-07-21 20:01:41 +00:00
|
|
|
--- guile-2.0.12.orig/test-suite/tests/net-db.test 2016-07-21 14:25:17.366696839 +0200
|
|
|
|
+++ guile-2.0.12/test-suite/tests/net-db.test 2016-07-21 14:25:23.086643860 +0200
|
2012-12-17 12:22:06 +00:00
|
|
|
@@ -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))))))))
|