anchor.diff:                  end, TmpAns),
                   TmpAns2 ++ Ans;
               {error, E} ->
  -                throw({concat_atoms(Case, error), E})
  +                Message = gui_str:format("Case: ~p, error: ~p", [Case, binary_to_list(E)]),
  +                throw(Message)
           end
       end, [], Cases).
   
  +%%--------------------------------------------------------------------
  +%% @doc
  +%% Returns list of test's parameters.
  +%% @end
  +%%--------------------------------------------------------------------
  +-spec get_stress_test_params() -> list().
   get_stress_test_params() ->
       [{suite, Suite}] = ets:lookup(stress_ets, suite),
       [{cases, Cases}] = ets:lookup(stress_ets, cases),
  
positive.code:             exec_ct_config(SuiteName, CaseName, CaseArgs, DefaultParams)
      end.
  
  is_stress_test() ->
      Envs = [os:getenv(?STRESS_ENV_VARIABLE), os:getenv(?STRESS_NO_CLEARING_ENV_VARIABLE)],
      lists:member("true", Envs).
  
  save_suite_and_cases(Suite, Cases) ->
      Pid = self(),
      case ets:info(stress_ets) of
  
negative.code: -include_lib("annotations/include/types.hrl").
  -include_lib("ctool/include/test/assertions.hrl").
  -include_lib("ctool/include/test/performance.hrl").
  -include_lib("common_test/include/ct.hrl").
  
  -export([around_advice/4, is_standard_test/0, stress_test/1, should_clear/1]).
  
  -type proplist() :: [{Key :: atom(), Value :: term()}].
  
  