aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/src/beam_ssa_dead.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2019-05-27 14:24:47 +0200
committerBjörn Gustavsson <[email protected]>2019-05-27 14:24:47 +0200
commit01851fed835d1b60edabc192672140402ed02474 (patch)
treefd2b91d10d0b9a0e53e353a6b5fd6a935a63351c /lib/compiler/src/beam_ssa_dead.erl
parenta65825e8f14f8e2c9aa9d5f95971199b98eee9ee (diff)
parenta52b0126c19ab7d49126c82183a0477e25373bfe (diff)
downloadotp-01851fed835d1b60edabc192672140402ed02474.tar.gz
otp-01851fed835d1b60edabc192672140402ed02474.tar.bz2
otp-01851fed835d1b60edabc192672140402ed02474.zip
Merge branch 'maint'
* maint: Fix loading of Core Erlang code for extracting a map element Fix unsafe optimizations where guard tests could be removed
Diffstat (limited to 'lib/compiler/src/beam_ssa_dead.erl')
-rw-r--r--lib/compiler/src/beam_ssa_dead.erl12
1 files changed, 2 insertions, 10 deletions
diff --git a/lib/compiler/src/beam_ssa_dead.erl b/lib/compiler/src/beam_ssa_dead.erl
index 423bc88c3b..b25685d20b 100644
--- a/lib/compiler/src/beam_ssa_dead.erl
+++ b/lib/compiler/src/beam_ssa_dead.erl
@@ -680,11 +680,8 @@ will_succeed_test(is_list, is_nonempty_list) ->
maybe;
will_succeed_test(is_nonempty_list, is_list) ->
yes;
-will_succeed_test(T1, T2) ->
- case is_numeric_test(T1) andalso is_numeric_test(T2) of
- true -> maybe;
- false -> no
- end.
+will_succeed_test(_T1, _T2) ->
+ maybe.
will_succeed_1('=:=', A, '<', B) ->
if
@@ -769,11 +766,6 @@ will_succeed_vars('==', Val1, '/=', Val2) when Val1 == Val2 -> no;
will_succeed_vars(_, _, _, _) -> maybe.
-is_numeric_test(is_float) -> true;
-is_numeric_test(is_integer) -> true;
-is_numeric_test(is_number) -> true;
-is_numeric_test(_) -> false.
-
eval_type_test(Test, Arg) ->
case eval_type_test_1(Test, Arg) of
true -> yes;