anchor.diff:      ?line {_, D} = ttb:stop([fetch, return_fetch_dir]),
       ?line ttb:format(D, [{out, ?OUTPUT}, {handler, simple_call_handler()}]),
       ?line {ok, Ret} = file:consult(?OUTPUT),
  -    ?line true = (2*(NumMsgs + 1) == length(Ret)).
  +    check_output(2*(NumMsgs + 1),Ret).
   changing_cwd_on_remote_node(cleanup,_Config) ->
       ?line stop_client_and_server().
   
  
positive.code: 
  simple_call_handler() ->
      {fun(A, {trace_ts, _, call, _, _} ,_,_) -> io:format(A, "ok.~n", []);
  	(_, end_of_trace, _, _) -> ok end, []}.
  
  marking_call_handler() ->
  
negative.code:     ct:log("formatted ~p",[{D,?OUTPUT}]),
      ?line {ok, Ret} = file:consult(?OUTPUT),
      ct:log("consulted: ~p",[Ret]),
      check_output(M,Ret).
  
  begin_trace_with_resume(ServerNode, ClientNode, Dest) ->
      ?line {ok, _} = ttb:tracer([ServerNode,ClientNode], [{file, Dest}, resume]),
  