anchor.diff:      ?line ok = ttb:format(filename:join(UploadDir,
   					atom_to_list(OtherNode)++"-file_fetch")),
   
  -    ?line [{trace,{S,_,Node},call,{?MODULE,foo,[]}},
  +    ?line [{trace_ts,{S,_,Node},call,{?MODULE,foo,[]},{_,_,_}},
   	   end_of_trace,
  -	   {trace,{_,_,OtherNode},call,{?MODULE,foo,[]}},
  +	   {trace_ts,{_,_,OtherNode},call,{?MODULE,foo,[]},{_,_,_}},
   	   end_of_trace] = flush(),
   
       ?line ok = file:set_cwd(Cwd),
  
positive.code:     ?line {ok,[{matched,_,1},{matched,_,1}]} = ttb:tp(?MODULE,foo,[]),
      ?line ?MODULE:foo(),
      ?line rpc:call(OtherNode,?MODULE,foo,[]),
      ?line ttb:stop(),
      ?line ?t:stop_node(OtherNode),
      ?line ok = ttb:format(filename:join(Privdir,atom_to_list(Node)++"-file")),
      ?line ok = ttb:format(filename:join(Privdir,
  					atom_to_list(OtherNode)++"-file")),
  
      ?line [{trace,LocalProc,call,{?MODULE,foo,[]}},
  	   end_of_trace,
  	   {trace,RemoteProc,call,{?MODULE,foo,[]}},
  	   end_of_trace] = flush(),
      ?line true = is_pid(LocalProc),
      ?line true = is_pid(RemoteProc),
  
negative.code:     ?line ?MODULE:foo(),
      ?line rpc:call(OtherNode,?MODULE,foo,[]),
      ?line ?t:capture_start(),
      ?line ttb:stop([return]),
      ?line ?t:capture_stop(),
      ?line [StoreString] = ?t:capture_get(),
      ?line UploadDir =
  