aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2014-01-31 12:01:05 +0100
committerBjörn Gustavsson <[email protected]>2014-01-31 16:04:30 +0100
commit479198f91ce37547047250b0a654300aab8ed5f8 (patch)
treeba7b453d85ab121d61a250f8cca9b8f23c711733
parentf14ab1100c4fc19b8446f732bac60429d181a2f3 (diff)
downloadotp-479198f91ce37547047250b0a654300aab8ed5f8.tar.gz
otp-479198f91ce37547047250b0a654300aab8ed5f8.tar.bz2
otp-479198f91ce37547047250b0a654300aab8ed5f8.zip
asn1ct: Silence dialyzer warnings for unmatched returns
-rw-r--r--lib/asn1/src/asn1ct.erl12
1 files changed, 7 insertions, 5 deletions
diff --git a/lib/asn1/src/asn1ct.erl b/lib/asn1/src/asn1ct.erl
index 531a4935fe..30f493a2df 100644
--- a/lib/asn1/src/asn1ct.erl
+++ b/lib/asn1/src/asn1ct.erl
@@ -1040,7 +1040,7 @@ get_file_list1(Stream,Dir,Includes,Acc) ->
Ret = io:get_line(Stream,''),
case Ret of
eof ->
- file:close(Stream),
+ ok = file:close(Stream),
lists:reverse(Acc);
FileName ->
SuffixedNameList =
@@ -1926,8 +1926,9 @@ read_config_file(ModuleName) ->
Includes = [I || {i,I} <- Options],
read_config_file1(ModuleName,Includes);
{error,Reason} ->
- file:format_error(Reason),
- throw({error,{"error reading asn1 config file",Reason}})
+ Error = "error reading asn1 config file: " ++
+ file:format_error(Reason),
+ throw({error,Error})
end.
read_config_file1(ModuleName,[]) ->
case filename:extension(ModuleName) of
@@ -1945,8 +1946,9 @@ read_config_file1(ModuleName,[H|T]) ->
{error,enoent} ->
read_config_file1(ModuleName,T);
{error,Reason} ->
- file:format_error(Reason),
- throw({error,{"error reading asn1 config file",Reason}})
+ Error = "error reading asn1 config file: " ++
+ file:format_error(Reason),
+ throw({error,Error})
end.
get_config_info(CfgList,InfoType) ->