anchor.diff:  get_stress_test_params() ->
       case is_stress_test() of
           true ->
  -            [{suite, Suite}] = ets:lookup(stress_ets, suite),
  -            [{cases, Cases}] = ets:lookup(stress_ets, cases),
  +            [{suite, Suite}] = ets:lookup(?STRESS_ETS_NAME, suite),
  +            [{cases, Cases}] = ets:lookup(?STRESS_ETS_NAME, cases),
   
               lists:foldl(fun(Case, Ans) ->
                   Params =  apply(Suite, Case, [get_params]),
  
positive.code: -define(STRESS_TIME_ENV_VARIABLE, "stress_time").
  -define(STRESS_DEFAULT_TIME, timer:hours(3) div 1000).
  -define(STRESS_ERRORS_TO_STOP, 100).
  
  %%%===================================================================
  %%% API
  
negative.code: %%--------------------------------------------------------------------
  -spec stress_test(Config :: list()) -> term() | no_return().
  stress_test(Config) ->
      [{suite, Suite}] = ets:lookup(?STRESS_ETS_NAME, suite),
      [{cases, Cases}] = ets:lookup(?STRESS_ETS_NAME, cases),
      [{timeout, Timeout}] = ets:lookup(?STRESS_ETS_NAME, timeout),
      ct:timetrap({seconds, Timeout + 300}),
  
      lists:foldl(fun(Case, Ans) ->
  