anchor.diff:          Pid -> Pid
       end.
   
  -get_process(NodeRef) ->
  +get_process({_,_} =NodeRef) ->
       GprocName = mk_gproc_name(NodeRef),
  +    get_process_int(GprocName);
  +get_process(Addr) when is_binary(Addr) ->
  +    GprocName = mk_gproc_addr(Addr),
  +    get_process_int(GprocName).
  +
  +get_process_int(GprocName) ->
       case catch gproc:lookup_pid({n,l,GprocName}) of
           {'EXIT', _} ->
               undefined;
  
positive.code: mk_gproc_name({OrgId, NodeName}) when is_binary(OrgId) andalso is_binary(NodeName) ->
      {heartbeat, OrgId, NodeName}.
  
  %% ------------------------------------------------------------------
  %% supervisor Function Definitions
  %% ------------------------------------------------------------------
  
negative.code:          get_or_create_process/1,
           get_process/1,
           get_heartbeating_nodes/1,
           mk_gproc_name/1,
           mk_gproc_addr/1]).
  
  %% Supervisor callbacks
  -export([init/1]).
  