diff options
Diffstat (limited to 'lib/megaco/src/tcp/megaco_tcp.erl')
| -rw-r--r-- | lib/megaco/src/tcp/megaco_tcp.erl | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/lib/megaco/src/tcp/megaco_tcp.erl b/lib/megaco/src/tcp/megaco_tcp.erl index 6ff8e5793f..51abc99d6c 100644 --- a/lib/megaco/src/tcp/megaco_tcp.erl +++ b/lib/megaco/src/tcp/megaco_tcp.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1999-2021. All Rights Reserved. +%% Copyright Ericsson AB 1999-2023. All Rights Reserved. %% %% Licensed under the Apache License, Version 2.0 (the "License"); %% you may not use this file except in compliance with the License. @@ -205,7 +205,7 @@ connect(SupPid, Parameters) -> {ok, Pid} -> ?d1("connect -> connection started: " "~n Pid: ~p", [Pid]), - gen_tcp:controlling_process(Socket, Pid), + _ = gen_tcp:controlling_process(Socket, Pid), ?d2("connect -> control transferred"), {ok, Socket, Pid}; {error, Reason} -> @@ -249,18 +249,18 @@ send_message(Socket, Data) -> "~n size(Data): ~p", [Socket, sz(Data)]), {Size, NewData} = add_tpkt_header(Data), Res = gen_tcp:send(Socket, NewData), - case Res of - ok -> - incNumOutMessages(Socket), - incNumOutOctets(Socket, Size); - _ -> - ok - end, + _ = case Res of + ok -> + incNumOutMessages(Socket), + incNumOutOctets(Socket, Size); + _ -> + ok + end, Res. -ifdef(megaco_debug). sz(Bin) when is_binary(Bin) -> - size(Bin); + byte_size(Bin); sz(List) when is_list(List) -> length(List). -endif. @@ -633,11 +633,11 @@ create_acceptor(Pid, Rec, TopSup, Listen) -> %% Description: Function is used to add the TPKT header %%----------------------------------------------------------------- add_tpkt_header(Data) when is_binary(Data) -> - L = size(Data) + 4, + L = byte_size(Data) + 4, {L, [3, 0, ((L) bsr 8) band 16#ff, (L) band 16#ff ,Data]}; add_tpkt_header(IOList) when is_list(IOList) -> Binary = list_to_binary(IOList), - L = size(Binary) + 4, + L = byte_size(Binary) + 4, {L, [3, 0, ((L) bsr 8) band 16#ff, (L) band 16#ff , Binary]}. %%----------------------------------------------------------------- |