anchor.diff:      end.
   
   %% All nodes are handled the same way - also the local node if it is traced
  -do_tp_on_nodes(Nodes, MFA, P, Flags) ->
  +do_tp_on_nodes(Nodes, X, P, Flags) ->
       lists:map(fun(Node) ->
  -		      case rpc:call(Node,erlang,trace_pattern,[MFA,P, Flags]) of
  +		      case rpc:call(Node,erlang,trace_pattern,[X,P, Flags]) of
   			  N when is_integer(N) ->
   			      {matched, Node, N};
   			  Else ->
  
positive.code: -module(dbg).
  -export([p/1,p/2,c/3,c/4,i/0,start/0,stop/0,stop_clear/0,tracer/0,
  	 tracer/2, tracer/3, get_tracer/0, get_tracer/1, tp/2, tp/3, tp/4, 
  	 ctp/0, ctp/1, ctp/2, ctp/3, tpl/2, tpl/3, tpl/4, ctpl/0, ctpl/1, 
  	 ctpl/2, ctpl/3, ctpg/0, ctpg/1, ctpg/2, ctpg/3, ltp/0, wtp/1, rtp/1, 
  	 dtp/0, dtp/1, n/1, cn/1, ln/0, h/0, h/1]).
  
negative.code:     do_ctp({Module, '_', '_'}, [global]);
  ctpg({_Module, _Function, _Arity} = X) ->
      do_ctp(X,[global]).
  
  do_ctp({Module, Function, Arity},[]) ->
      do_ctp({Module, Function, Arity},[global]),
      do_ctp({Module, Function, Arity},[local]);
  do_ctp({_Module, _Function, _Arity}=MFA,Flags) ->
      Nodes = req(get_nodes),
      {ok,do_tp_on_nodes(Nodes,MFA,false,Flags)}.
  
  ctpe(Event) when Event =:= send;
  		 Event =:= 'receive' ->
      Nodes = req(get_nodes),
      {ok,do_tp_on_nodes(Nodes,Event,false,[])}.
  
  %%
  %% ltp() -> ok
  