anchor.diff:  %% @doc Called before each test case.
   pre_init_per_testcase(_TC, Config, State=#state{auto_start=false}) ->
       {Config, State};
  -pre_init_per_testcase(TC, Config, State) ->
  +pre_init_per_testcase(TC, Config, State=#state{suite=Suite}) ->
       ct:pal("~p handling pre_init_per_testcase [~p]~n", [?MODULE, TC]),
  -    {systest:start(TC, Config), State}.
  +    {systest:start(Suite, TC, Config), State}.
   
   post_end_per_testcase(TC, Config, Return, State) ->
       %% TODO: handle {save_config, Config} return values in st:stop
  
positive.code: -export([terminate/1]).
  
  -record(state, {
      auto_start = false      :: boolean(),
      data       = dict:new() :: dict()
  }).
  
  %% @doc Return a unique id for this CTH.
  
negative.code: %% @doc Called before each init_per_group.
  pre_init_per_group(_Group, Config, State=#state{auto_start=false}) ->
      {Config, State};
  pre_init_per_group(Group, Config, State=#state{suite=Suite}) ->
      {systest:start(Suite, Group, Config), State}.
  
  post_end_per_group(Group, Config, Result, State) ->
      case ?CONFIG(Group, Config, undefined) of
  