All dialyzer errors fixed; dialyzer added to travis.yml

parent 8031dafa
...@@ -8,3 +8,4 @@ script: ...@@ -8,3 +8,4 @@ script:
- ./rebar3 compile - ./rebar3 compile
- ./rebar3 xref - ./rebar3 xref
- ./rebar3 eunit - ./rebar3 eunit
- ./rebar3 dialyzer
...@@ -18,7 +18,7 @@ ...@@ -18,7 +18,7 @@
-export_type([tout/0, opts/0]). -export_type([tout/0, opts/0]).
-record(timeout, -record(timeout,
{ref :: reference(), {ref :: reference() | undefined,
last_bump :: integer(), last_bump :: integer(),
message :: any(), message :: any(),
unit = second :: erlang:time_unit(), unit = second :: erlang:time_unit(),
......
...@@ -13,6 +13,8 @@ ...@@ -13,6 +13,8 @@
encode_packet/2]). encode_packet/2]).
-export_type([codec/0]). -export_type([codec/0]).
-dialyzer(no_improper_lists).
-record(st, -record(st,
{buffer = <<>> :: binary()}). {buffer = <<>> :: binary()}).
-define(MAX_PACKET_SIZE, 1 * 1024 * 1024). % 1mb -define(MAX_PACKET_SIZE, 1 * 1024 * 1024). % 1mb
......
...@@ -76,7 +76,7 @@ shutdown(Conn) -> ...@@ -76,7 +76,7 @@ shutdown(Conn) ->
gen_server:cast(Conn, shutdown). gen_server:cast(Conn, shutdown).
%% To be called by upstream %% To be called by upstream
-spec send(handle(), iodata()) -> ok. -spec send(handle(), iodata()) -> ok | {error, unknown_upstream}.
send(Conn, Data) -> send(Conn, Data) ->
gen_server:call(Conn, {send, Data}, ?SEND_TIMEOUT * 2). gen_server:call(Conn, {send, Data}, ?SEND_TIMEOUT * 2).
......
...@@ -16,6 +16,8 @@ ...@@ -16,6 +16,8 @@
encode_packet/2]). encode_packet/2]).
-export_type([codec/0]). -export_type([codec/0]).
-dialyzer(no_improper_lists).
-record(full_st, -record(full_st,
{decode_buf = <<>> :: binary(), {decode_buf = <<>> :: binary(),
enc_seq_no :: integer(), enc_seq_no :: integer(),
......
...@@ -45,7 +45,7 @@ ...@@ -45,7 +45,7 @@
codec :: mtp_codec:codec() | undefined, codec :: mtp_codec:codec() | undefined,
down :: mtp_down_conn:handle() | undefined, down :: mtp_down_conn:handle() | undefined,
dc_id :: {DcId :: integer(), Pool :: pid()}, dc_id :: {DcId :: integer(), Pool :: pid()} | undefined,
ad_tag :: binary(), ad_tag :: binary(),
addr :: mtp_config:netloc(), % IP/Port of remote side addr :: mtp_config:netloc(), % IP/Port of remote side
......
...@@ -15,6 +15,8 @@ ...@@ -15,6 +15,8 @@
encode_packet/2]). encode_packet/2]).
-export_type([codec/0]). -export_type([codec/0]).
-dialyzer(no_improper_lists).
-record(int_st, -record(int_st,
{padding = false :: boolean(), {padding = false :: boolean(),
buffer = <<>> :: binary()}). buffer = <<>> :: binary()}).
......
...@@ -13,6 +13,8 @@ ...@@ -13,6 +13,8 @@
encode_ip_port/2]). encode_ip_port/2]).
-export_type([codec/0]). -export_type([codec/0]).
-dialyzer(no_improper_lists).
-record(rpc_st, -record(rpc_st,
{client_addr :: binary(), {client_addr :: binary(),
proxy_addr :: binary(), proxy_addr :: binary(),
...@@ -97,7 +99,7 @@ encode_packet({data, Msg}, {{ConnId, ClientAddr, ProxyTag}, ProxyAddr}) -> ...@@ -97,7 +99,7 @@ encode_packet({data, Msg}, {{ConnId, ClientAddr, ProxyTag}, ProxyAddr}) ->
encode_packet(remote_closed, ConnId) -> encode_packet(remote_closed, ConnId) ->
<<?RPC_CLOSE_CONN, ConnId:64/little-signed>>. <<?RPC_CLOSE_CONN, ConnId:64/little-signed>>.
-spec encode_ip_port(inet:ip_address(), inet:port_number()) -> iodata().
encode_ip_port(IPv4, Port) when tuple_size(IPv4) == 4 -> encode_ip_port(IPv4, Port) when tuple_size(IPv4) == 4 ->
IpBin = inet_pton(IPv4), IpBin = inet_pton(IPv4),
[lists:duplicate(10, <<0>>) [lists:duplicate(10, <<0>>)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment