From 7d1509b7e58cf67f033eda353276315d72370e92 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Micha=C5=82=20Muska=C5=82a?= Date: Sat, 17 Feb 2018 11:36:25 +0100 Subject: Inline more type test BIFs in HiPE --- lib/hipe/icode/hipe_icode_inline_bifs.erl | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) (limited to 'lib') diff --git a/lib/hipe/icode/hipe_icode_inline_bifs.erl b/lib/hipe/icode/hipe_icode_inline_bifs.erl index 7a6947f190..330527b9a9 100644 --- a/lib/hipe/icode/hipe_icode_inline_bifs.erl +++ b/lib/hipe/icode/hipe_icode_inline_bifs.erl @@ -24,8 +24,9 @@ %% Currently inlined BIFs: %% and, or, xor, not, <, >, >=, =<, ==, /=, =/=, =:= -%% is_atom, is_boolean, is_binary, is_float, is_function, -%% is_integer, is_list, is_pid, is_port, is_reference, is_tuple +%% is_atom, is_boolean, is_binary, is_bitstring, is_float, +%% is_integer, is_number, is_function, is_list, +%% is_pid, is_port, is_reference, is_tuple, is_map -module(hipe_icode_inline_bifs). @@ -118,15 +119,18 @@ is_type_test(Name) -> case Name of is_integer -> {true, integer}; is_float -> {true, float}; + is_number -> {true, number}; is_tuple -> {true, tuple}; - is_binary -> {true, binary}; + is_binary -> {true, binary}; + is_bitsting -> {true, bitstr}; is_list -> {true, list}; is_pid -> {true, pid}; is_atom -> {true, atom}; is_boolean -> {true, boolean}; - is_function -> {true, function}; + is_function -> {true, function}; is_reference -> {true, reference}; is_port -> {true, port}; + is_map -> {true, map}; _ -> false end. -- cgit v1.2.3