anchor.diff:         share_opt,
          beam_ssa_dead_crash,
          stack_init,
  -       grab_bag
  +       grab_bag,
  +       coverage
         ]}].
   
   init_per_suite(Config) ->
  
positive.code: 	 init_per_group/2,end_per_group/2,
           calls/1,tuple_matching/1,recv/1,maps/1,
           cover_ssa_dead/1,combine_sw/1,share_opt/1,
           beam_ssa_dead_crash/1,stack_init/1,grab_bag/1]).
  
  suite() -> [{ct_hooks,[ts_install_cth]}].
  
  
negative.code:         <<1 || 99, [] <- hour>> bsr false,
          ok.
  
  coverage(_Config) ->
  
      %% Cover beam_ssa_codegen:force_reg/2
      no_match = case true of
                     <<_:42>> -> true;
                     _ -> no_match
                end,
  
      no_match = case [] of
                     <<$f:1.7>> -> ok;
                     _ -> no_match
                 end,
      {'EXIT',{{badmatch,$T},_}} = (catch coverage_1()),
  
      ok.
  
  coverage_1() ->
      <<area/signed-bitstring>> = $T.
  
  
  %% The identity function.
  id(I) -> I.
  