mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 13:30:26 +02:00
Code Activity

Cygwin/MSYS: 00-socket.test: abstract sockets are unsupported

Browse source 
Binding to AF_UNIX abstract sockets is not supported on Cygwin and
presumably MSYS as well.

* test-suite/tests/00-socket.text ("AF_UNIX abstract"): throw unsupported
  on Cygwin and MSYS
This commit is contained in:
Michael Gran 2024-12-25 09:44:21 -08:00
parent 73a8ca88fb
commit c9a19a03f8
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
test-suite/tests/00-socket.test
View file

@ -29,6 +29,12 @@
(when (string-ci=? "darwin" (utsname:sysname (uname))) (when (string-ci=? "darwin" (utsname:sysname (uname)))
(throw 'untested))) (throw 'untested)))
(define (skip-on-cygwin-msys)
(when (or (string-contains %host-type "cygwin")
(string-contains %host-type "msys"))
;; See https://cygwin.com/pipermail/cygwin/2023-June/253785.html
(throw 'unsupported)))
;;; ;;;
@ -341,6 +347,7 @@
(pass-if "bind abstract" (pass-if "bind abstract"
(skip-on-darwin) (skip-on-darwin)
(skip-on-cygwin-msys)
(catch 'system-error (catch 'system-error
(lambda () (lambda ()
(bind server-socket AF_UNIX path) (bind server-socket AF_UNIX path)