mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-29 19:30:36 +02:00
Code Activity

tests: Check TCP_NODELAY for non-zero instead of 1.

Browse source 
POSIX does not explicitly say that stored value using setsockopt will be
returned by getsockopt.  At least for TCP_NODELAY on Darwin they do
differ.  Darwin returns internal define TF_NODELAY (4) instead of 1 the
test expected.  Since for boolean flags "non-zero is true", rewrite the
test to check just that.

* test-suite/tests/00-socket.test ("setsockopt AF_INET")
["IPPROTO_TCP TCP_NODELAY"]: Check for non-zero value from getsockopt.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Tomas Volf 2024-08-10 00:54:27 +02:00 • committed by Ludovic Courtès
parent b7bd440f22
commit a8ce7f1f92
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -147,7 +147,7 @@
(pass-if "IPPROTO_TCP TCP_NODELAY"
(let ((sock (socket AF_INET SOCK_STREAM 0)))
(setsockopt sock IPPROTO_TCP TCP_NODELAY 1)
(eqv? 1 (getsockopt sock IPPROTO_TCP TCP_NODELAY))))))
(not (eqv? 0 (getsockopt sock IPPROTO_TCP TCP_NODELAY)))))))
;;;