From 2afc6c5751cf7f4c002a6817819d33bfe2418962 Mon Sep 17 00:00:00 2001 From: Linus Vettiger Date: Sun, 16 Nov 2025 13:17:43 +0100 Subject: [PATCH] fix tests on aarch64-darwin --- test/test.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/test/test.hs b/test/test.hs index 90f10d8..fa6e627 100644 --- a/test/test.hs +++ b/test/test.hs @@ -99,6 +99,7 @@ group01 = testGroup "connect" [ testGroup "Inet/Stream/TCP" t1 ] case r of Left e | e == eNetworkUnreachable -> return () | e == eAddressNotAvailable -> return () + | e == eAddressFamilyNotSupported -> return () | otherwise -> throwIO e Right () -> assertFailure "connection should have failed" )