anchor.diff:      io:format("SysProcs0=~p~n", [SysProcs0]),
       [InitPid, PurgerPid, LitCollectorPid,
        DirtySigNPid, DirtySigHPid, DirtySigMPid,
  -     PrimFilePid] = SysProcs0,
  +     PrimFilePid,
  +     ESockRegPid] = SysProcs0,
       InitPid = rpc:call(Node, erlang, whereis, [init]),
       PurgerPid = rpc:call(Node, erlang, whereis, [erts_code_purger]),
       Procs = rpc:call(Node, erlang, processes, []),
  
positive.code:     Config.
  
  
  init_per_testcase(Func, Config) ->
      Config.
  
  end_per_testcase(_Func, _Config) ->
  
negative.code:         [{initial_call,{prim_file,start,0}},_] ->
  	    undefined = SysProcs#sys_procs.prim_file,
  	    find_system_procs(Ps, SysProcs#sys_procs{prim_file = P});
          [{initial_call,{socket_registry,start,0}},_] ->
  	    undefined = SysProcs#sys_procs.socket_registry,
  	    find_system_procs(Ps, SysProcs#sys_procs{socket_registry = P});
  	_ ->
  	    find_system_procs(Ps, SysProcs)
      end.
  