From 69dd6018b7731becda651393b837639746aa63c7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= <bjorn@erlang.org>
Date: Sat, 21 May 2016 07:53:00 +0200
Subject: beam_bool_SUITE: Cover one more line

---
 lib/compiler/test/beam_bool_SUITE.erl | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

(limited to 'lib')

diff --git a/lib/compiler/test/beam_bool_SUITE.erl b/lib/compiler/test/beam_bool_SUITE.erl
index a07d010879..e585eaedb5 100644
--- a/lib/compiler/test/beam_bool_SUITE.erl
+++ b/lib/compiler/test/beam_bool_SUITE.erl
@@ -22,7 +22,8 @@
 -export([all/0,suite/0,groups/0,init_per_suite/1,end_per_suite/1,
 	 init_per_group/2,end_per_group/2,
 	 before_and_inside_if/1,
-	 scotland/1,y_registers/1,protected/1]).
+	 scotland/1,y_registers/1,protected/1,
+	 maps/1]).
 
 suite() ->
     [{ct_hooks,[ts_install_cth]}].
@@ -36,7 +37,8 @@ groups() ->
       [before_and_inside_if,
        scotland,
        y_registers,
-       protected
+       protected,
+       maps
       ]}].
 
 init_per_suite(Config) ->
@@ -179,6 +181,14 @@ welcome({perfect, Profit}) ->
 	    {id({Profit})}
     end.
 
+maps(_Config) ->
+    ok = evidence(#{0 => 42}).
+
+%% Cover handling of put_map in in split_block_label_used/2.
+evidence(#{0 := Charge}) when 0; #{[] => Charge} == #{[] => 42} ->
+    ok.
+
+
 %%%
 %%% Common utilities.
 %%%
-- 
cgit v1.2.3