diff options
| author | Hans Bolinder <[email protected]> | 2019-02-11 08:55:44 +0100 |
|---|---|---|
| committer | Hans Bolinder <[email protected]> | 2019-02-11 08:55:44 +0100 |
| commit | fbb6ee2fa4fca7b908fcd502c769a66420765b36 (patch) | |
| tree | fcaae9c40a739373e170f4e2abf1951a31dd334b /lib/hipe | |
| parent | 2a1dab38c8a2186a7413eabb2035234cb66f367f (diff) | |
| parent | b3c8e94dd0eae8a01fd4513eff3c2f3741dad193 (diff) | |
| download | otp-fbb6ee2fa4fca7b908fcd502c769a66420765b36.tar.gz otp-fbb6ee2fa4fca7b908fcd502c769a66420765b36.tar.bz2 otp-fbb6ee2fa4fca7b908fcd502c769a66420765b36.zip | |
Merge branch 'dialyzer/hasse/fix_bug_erl_bif_types/OTP-15570' into maint
* dialyzer/hasse/fix_bug_erl_bif_types/OTP-15570:
dialyzer: Fix a bug affecting keyfind/keysearch/keymember
Diffstat (limited to 'lib/hipe')
| -rw-r--r-- | lib/hipe/cerl/erl_bif_types.erl | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lib/hipe/cerl/erl_bif_types.erl b/lib/hipe/cerl/erl_bif_types.erl index 48ce641ab9..799957dfdc 100644 --- a/lib/hipe/cerl/erl_bif_types.erl +++ b/lib/hipe/cerl/erl_bif_types.erl @@ -2224,11 +2224,7 @@ type_order() -> [t_number(), t_atom(), t_reference(), t_fun(), t_port(), t_pid(), t_tuple(), t_map(), t_list(), t_bitstr()]. -key_comparisons_fail(X0, KeyPos, TupleList, Opaques) -> - X = case t_is_number(t_inf(X0, t_number(), Opaques), Opaques) of - false -> X0; - true -> t_number() - end, +key_comparisons_fail(X, KeyPos, TupleList, Opaques) -> lists:all(fun(Tuple) -> Key = type(erlang, element, 2, [KeyPos, Tuple]), t_is_none(t_inf(Key, X, Opaques)) |