anchor.diff:              DataDir = proplists:get_value(data_dir, Config),
               FwdNodeExe = filename:join(DataDir, "fwd_node"),
               Name = atom_to_list(?MODULE)
  -                ++ "-" ++ atom_to_list(proplists:get_value(testcase, Config))
                   ++ "-" ++ "ei_node"
                   ++ "-" ++ integer_to_list(erlang:system_time(second))
                   ++ "-" ++ integer_to_list(erlang:unique_integer([positive])),
  
positive.code:         false ->
              {P3, M3} = Spawn(fun () -> receive after infinity -> ok end end,
                               [{monitor, [{tag, Tag}]}]),
              stop_node(Node),
              [{Tag, M3, process, P3, noconnection}] = recv_msgs(1),
  
              case SpawnType == spawn_opt of
  
negative.code: 
  id(I) -> I.
  
  stop_node(Peer, Node) ->
      verify_nc(node()),
      verify_nc(Node),
      ?CT_STOP_PEER(Peer, Node).
  
  verify_nc(Node) ->
      P = self(),
  