anchor.diff:  %%--------------------------------------------------------------------
   all() -> 
       [tc1,tc2,tc3,tc4,tc5,tc6,tc7,
  -     tc11,tc12,tc13,tc14].
  +     tc11,tc12,tc13,tc14,tc15,tc16].
   
   tc1(_) ->
       fini.
  
positive.code:     ct:comment("This one should be failed by eptc"),
      yes.
  tc15(_) ->
      exit(byebye).
  
negative.code: %%--------------------------------------------------------------------
  end_per_testcase(tc11, _Config) ->
      ct:comment("A warning should be printed"),
      exit(warning_should_be_printed);
  end_per_testcase(tc12, _Config) ->
      ct:comment("A warning should be printed"),
      ct:sleep(5000);
  end_per_testcase(tc13, Config) ->
      ct:comment("A warning should be printed"),
      badmatch = ?config(void, Config);
  end_per_testcase(tc14, Config) ->
      ok = ?config(tc_status, Config),
      {fail,tc14_should_be_failed};
  end_per_testcase(tc15, Config) ->
      exit(kaboom);
  end_per_testcase(tc16, Config) ->
      ct:sleep(5000);
  end_per_testcase(_TestCase, _Config) ->
      done.
  
  