anchor.diff:  
   receive_trace_msg_ts({trace_ts, Pid, call, {erlang,F,A}}, PrevTs, TsType) ->
       receive
  -        {trace_ts, Pid, call, {erlang, F, A}, Ts} ->
  +        {trace_ts, Pid, call, {erlang, F, A}, Ts} = M ->
  +            io:format("~p (PrevTs: ~p)~n",[M, PrevTs]),
               check_ts(TsType, PrevTs, Ts),
               Ts;
           Other ->
  
positive.code: 
  receive_trace_msg_ts_return_to({trace_ts, Pid, return_to, {M,F,A}}, PrevTs, TsType) ->
      receive
          {trace_ts, Pid, return_to, {M, F, A}, Ts} ->
              check_ts(TsType, PrevTs, Ts),
              Ts;
          Other ->
  
negative.code: 
  receive_trace_msg_ts_return_from({trace_ts, Pid, return_from, {erlang,F,A}}, PrevTs, TsType) ->
      receive
          {trace_ts, Pid, return_from, {erlang, F, A}, _Value, Ts} = M ->
              io:format("~p (PrevTs: ~p)~n",[M, PrevTs]),
              check_ts(TsType, PrevTs, Ts),
              Ts;
          Other ->
  