aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2017-12-06 10:41:56 +0100
committerBjörn Gustavsson <[email protected]>2017-12-07 10:09:35 +0100
commit5f3954da5a051f859a87371f720fe774a6a479ba (patch)
treedcebcfe216e690221488c4a61850acbde3177760
parent423e51db0721b3c9bdc3dfda5c71db0a1b39f4f0 (diff)
downloadotp-5f3954da5a051f859a87371f720fe774a6a479ba.tar.gz
otp-5f3954da5a051f859a87371f720fe774a6a479ba.tar.bz2
otp-5f3954da5a051f859a87371f720fe774a6a479ba.zip
Cover handling of #k_call{} in v3_codegen:bsm_rename_ctx/4
-rw-r--r--lib/compiler/test/bs_match_SUITE.erl6
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/compiler/test/bs_match_SUITE.erl b/lib/compiler/test/bs_match_SUITE.erl
index 39f9b5d063..7e1a432511 100644
--- a/lib/compiler/test/bs_match_SUITE.erl
+++ b/lib/compiler/test/bs_match_SUITE.erl
@@ -1590,14 +1590,16 @@ check_bitstring_list(_, _) ->
guard(_Config) ->
Tuple = id({a,b}),
ok = guard_1(<<1,2,3>>, {1,2,3}),
-
+ ok = guard_2(<<42>>, #{}),
ok.
%% Cover handling of #k_put{} in v3_codegen:bsm_rename_ctx/4.
-
guard_1(<<A,B,C>>, Tuple) when Tuple =:= {A,B,C} ->
ok.
+%% Cover handling of #k_call{} in v3_codegen:bsm_rename_ctx/4.
+guard_2(<<_>>, Healing) when Healing#{[] => Healing} =:= #{[] => #{}} ->
+ ok.
check(F, R) ->
R = F().