diff options
| author | Björn Gustavsson <[email protected]> | 2014-01-31 12:01:05 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2014-01-31 16:04:30 +0100 |
| commit | 479198f91ce37547047250b0a654300aab8ed5f8 (patch) | |
| tree | ba7b453d85ab121d61a250f8cca9b8f23c711733 /lib/asn1/src/asn1ct.erl | |
| parent | f14ab1100c4fc19b8446f732bac60429d181a2f3 (diff) | |
| download | otp-479198f91ce37547047250b0a654300aab8ed5f8.tar.gz otp-479198f91ce37547047250b0a654300aab8ed5f8.tar.bz2 otp-479198f91ce37547047250b0a654300aab8ed5f8.zip | |
asn1ct: Silence dialyzer warnings for unmatched returns
Diffstat (limited to 'lib/asn1/src/asn1ct.erl')
| -rw-r--r-- | lib/asn1/src/asn1ct.erl | 12 |
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) -> |