Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:Ledest:erlang:23
erlang
2232-kernel-sctp-test-More-nxdomain-tweaking.patch
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File 2232-kernel-sctp-test-More-nxdomain-tweaking.patch of Package erlang
From 4be0d72af323f4976644a2a82621eb3b26abc116 Mon Sep 17 00:00:00 2001 From: Micael Karlberg <bmk@erlang.org> Date: Wed, 16 Dec 2020 13:51:33 +0100 Subject: [PATCH 2/4] [kernel|sctp|test] More (nxdomain-) tweaking --- lib/kernel/test/gen_sctp_SUITE.erl | 16 ++++++++++------ 1 file changed, 10 insertions(+), 6 deletions(-) diff --git a/lib/kernel/test/gen_sctp_SUITE.erl b/lib/kernel/test/gen_sctp_SUITE.erl index 3ed9164ef1..c1e1bb86bc 100644 --- a/lib/kernel/test/gen_sctp_SUITE.erl +++ b/lib/kernel/test/gen_sctp_SUITE.erl @@ -1670,10 +1670,10 @@ get_addrs_by_family_aux(Family, NumAddrs) when Family =:= inet; Family =:= inet6 -> case inet:getaddr(localhost, Family) of {error, eafnosupport = Reason} -> - ?P("failed get addrs for localhost: ~p", [Reason]), + ?P("failed get (~w) addrs for localhost: ~p", [Family, Reason]), {error, ?F("No support for ~p (~p)", [Family, Reason])}; {error, nxdomain = Reason} -> - ?P("failed get addrs for localhost: ~p", [Reason]), + ?P("failed get (~w) addrs for localhost: ~p", [Family, Reason]), {error, ?F("No support for ~p", [Family, Reason])}; {ok, _} -> ?P("got addr for localhost (ignored)"), @@ -1692,10 +1692,14 @@ get_addrs_by_family_aux(Family, NumAddrs) when Family =:= inet; end end; get_addrs_by_family_aux(inet_and_inet6, NumAddrs) -> - catch {ok, [case get_addrs_by_family_aux(Family, NumAddrs) of - {ok, Addrs} -> Addrs; - {error, Reason} -> throw({error, Reason}) - end || Family <- [inet, inet6]]}. + try [case get_addrs_by_family_aux(Family, NumAddrs) of + {ok, Addrs} -> Addrs; + {error, Reason} -> throw({error, Reason}) + end || Family <- [inet, inet6]] + catch + throw:{error, _} = ERROR -> + ERROR + end. filter_addrs_by_family(IfAddrs, Family) -> lists:flatten([[Addr || {addr, Addr} <- Info, -- 2.26.2
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor