diff options
author | Micael Karlberg <bmk@erlang.org> | 2022-03-17 17:50:13 +0100 |
---|---|---|
committer | Micael Karlberg <bmk@erlang.org> | 2022-03-24 12:50:20 +0100 |
commit | 05b4d416225386cb16a21e30b9a1f59f9ea38ddb (patch) | |
tree | e0905dc462997d9c9e0a24d28666c6ed0cb712ef /lib/kernel/src/net.erl | |
parent | a49198ad4534587ba98a6891ac87e2829589d8b3 (diff) | |
download | erlang-05b4d416225386cb16a21e30b9a1f59f9ea38ddb.tar.gz |
[kernel|net] Type and argument fixes
Fixed a couple of issues detected by dialyzer.
OTP-16464
Diffstat (limited to 'lib/kernel/src/net.erl')
-rw-r--r-- | lib/kernel/src/net.erl | 40 |
1 files changed, 20 insertions, 20 deletions
diff --git a/lib/kernel/src/net.erl b/lib/kernel/src/net.erl index e14a583aee..dd92a5bcbf 100644 --- a/lib/kernel/src/net.erl +++ b/lib/kernel/src/net.erl @@ -496,8 +496,8 @@ win_getifaddrs_iat2([#{index := Idx} = IpAddr|IpAddrTab], IpIfInfos, Acc) -> %% Note that here its (IfAddr) *not* a list! {IfAddr, PktIfAddr} = win_getifaddrs_iat3(Name, IpAddr, IfEntry), win_getifaddrs_iat2(IpAddrTab, IpIfInfos, [IfAddr, PktIfAddr|Acc]); - {ok, #{name := Name, - description := Desc} = IfEntry} when (Name =:= "") -> + {ok, #{name := Name, + descr := Desc} = IfEntry} when (Name =:= "") -> case if_info_search(Idx, IpIfInfos) of {value, #{name := Name2}} -> %% Note that here its (IfAddr) *not* a list! @@ -518,15 +518,15 @@ win_getifaddrs_iat2([#{index := Idx} = IpAddr|IpAddrTab], IpIfInfos, Acc) -> end. win_getifaddrs_iat3(Name, - #{addr := Addr, - mask := Mask, + #{addr := Addr, + mask := Mask, %% Why do we skip this and "make" our own? - bcast_addr := _BCastAddr} = _IpAddr, - #{type := Type, - admin_status := AStatus, - internal_oper_status := _OStatus, - phys_addr := PhysAddr, - index := Idx} = _IfEntry) -> + bcast_addr := _BCastAddr} = _IpAddr, + #{type := Type, + admin_status := AStatus, + oper_status := _OStatus, + phys_addr := PhysAddr, + index := Idx} = _IfEntry) -> Flags1 = case Type of ethernet_csmacd -> [broadcast,multicast]; @@ -596,21 +596,21 @@ win_getifaddrs_aa2([#{index := Idx} = AdAddrs|AdsAddrs], IpIfInfos, Acc) -> {ok, #{name := Name} = IfEntry} when (Name =/= "") -> {IfAddrs, PktIfAddr} = win_getifaddrs_aa3(Name, AdAddrs, IfEntry), win_getifaddrs_aa2(AdsAddrs, IpIfInfos, [IfAddrs,PktIfAddr|Acc]); - {ok, #{name := Name, - description := Desc} = IfEntry} when (Name =:= "") -> + {ok, #{name := Name, + descr := Desc} = IfEntry} when (Name =:= "") -> case if_info_search(Idx, IpIfInfos) of {value, #{name := Name2}} -> {IfAddrs, PktIfAddr} = win_getifaddrs_aa3(Name2, AdAddrs, IfEntry), win_getifaddrs_aa2(AdsAddrs, IpIfInfos, [IfAddrs, PktIfAddr|Acc]); - false -> - %% Use description + false -> + %% Use description {IfAddrs, PktIfAddr} = win_getifaddrs_aa3(Desc, AdAddrs, IfEntry), win_getifaddrs_aa2(AdsAddrs, IpIfInfos, [IfAddrs, PktIfAddr|Acc]) - end; + end; {error, _} -> win_getifaddrs_aa2(AdsAddrs, IpIfInfos, Acc) end. @@ -619,11 +619,11 @@ win_getifaddrs_aa3(Name, #{flags := #{no_multicast := NoMC}, unicast_addrs := UCastAddrs, prefixes := Prefixes} = _AdAddrs, - #{type := Type, - admin_status := AStatus, - internal_oper_status := _OStatus, - phys_addr := PhysAddr, - index := Idx} = _IfEntry) -> + #{type := Type, + admin_status := AStatus, + oper_status := _OStatus, + phys_addr := PhysAddr, + index := Idx} = _IfEntry) -> Flags1 = if (NoMC =:= false) -> [multicast]; |