anchor.diff:          {'DOWN', MRef, process, Pid, Reason} ->
               p("worker process terminated: "
                 "~n      ~p", [Reason]),
  -            ok
  +            ok;
  +
  +        {'EXIT', TCPid, {timetrap_timeout = R, TCTimeout, TCSTack}} ->
  +            p("received timetrap timeout (~w ms) from ~p => "
  +              "Kill executor process"
  +              "~n      TC Stack: ~p", [TCTimeout, TCPid, TCSTack]),
  +            exit(Pid, kill),
  +            ?SKIP(R)
       end,
       ok.
  +
   
   
   %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
positive.code: mstone1(suite) ->
      [];
  mstone1(Config) when is_list(Config) ->
      process_flag(trap_exit, true),
      WorkerNode = ?config(worker_node, Config),
      %% The point of this is
      %% to make sure we utilize as much of the host as possible...
      RunTime   = 1, % Minute
      NumSched  = try erlang:system_info(schedulers_online) of N -> N
                  catch _:_:_ -> 1
                  end,
      Factor    = 1 + (NumSched div 12),
      Mod       = megaco_codec_mstone1,
      Func      = start,
      Args      = [RunTime, Factor],
      p("Run with: "
        "~n      Run Time: ~p min(s)"
        "~n      Factor:   ~p", [RunTime, Factor]),
      ct:timetrap(?MINS(RunTime + 1)),
      do_meas(?FUNCTION_NAME, WorkerNode, Mod, Func, Args).
  
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
negative.code: mstone2(suite) ->
      [];
  mstone2(Config) when is_list(Config) ->
      Pre  = fun() ->
                     RunTime  = 1, % Minutes
                     NumSched =
                         try erlang:system_info(schedulers_online) of N -> N
                         catch _:_:_ -> 1
                         end,
                     Factor   = 1 + (NumSched div 12),
                     ct:timetrap(?MINS(RunTime + 1)),
                     {Factor, RunTime, ?config(worker_node, Config)}
             end,
      Case = fun({Factor, RunTime, WorkerNode}) ->
                     Mode = standard,
                     Mod  = megaco_codec_mstone2,
                     Func = start,
                     Args = [Factor, RunTime, Mode],
                     p("Run with: "
                       "~n      Factor:   ~p"
                       "~n      Run Time: ~p min(s)"
                       "~n      Mode:     ~p", [Factor, RunTime, Mode]),
                     do_meas(WorkerNode, Mod, Func, Args)
             end,
      Post = fun(_) -> ok end,
      try_tc(?FUNCTION_NAME, Pre, Case, Post).
  
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  