anchor.diff:  
   all() -> 
       [big, tiny, simple, message, distributed, port, ip_port,
  +     send,
        file_port, file_port2, file_port_schedfix, ip_port_busy,
        wrap_port, wrap_port_time, with_seq_trace, dead_suspend,
        local_trace, saved_patterns, tracer_exit_on_stop,
  
positive.code:     [{trace,S,call,{dbg,ltp,[]},S},
       {trace,S,call,{dbg,ln,[]},S}] = flush(),
      ok.
  
  %% Simple test of distributed tracing
  distributed(Config) when is_list(Config) ->
  
negative.code:             flush(Acc ++ [X])
      after 1000 ->
                Acc
      end.
  
  flush_trace() ->
      flush_trace([]).
  flush_trace(Acc) ->
      receive
  	X when element(1,X) =:= trace;
  	       element(1,X) =:= trace_ts
  	       -> flush_trace(Acc ++ [X])
      after 1000 ->
  	    Acc
      end.
  
  start() ->
  