anchor.diff:  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   
   pi(Item) ->
  -    {Item, Val} = process_info(self(), Item),
  +    pi(self(), Item).
  +pi(Pid, Item) ->
  +    {Item, Val} = process_info(Pid, Item),
       Val.
       
   
  
positive.code:     ok.
  
  wait_for_ready_net(Config) ->
      wait_for_ready_net(?NODES, Config).
  
  wait_for_ready_net(Nodes0, Config) ->
      Nodes = lists:sort(Nodes0),
      io:format("wait_for_ready_net ~p~n", [Nodes]),
      ?UNTIL(begin
                 lists:all(fun(N) -> Nodes =:= get_known(N) end, Nodes) and
  		   lists:all(fun(N) ->
  				     LNs = rpc:call(N, erlang, nodes, []),
  				     Nodes =:= lists:sort([N | LNs])
  			     end, Nodes)
             end).
  
  get_known(Node) ->
  
negative.code:     case init:get_argument(ring_line) of
  	{ok, _} -> [ring_line];
  	_ ->
  	    [
               names, names_hidden, locks, locks_hidden, bad_input,
  	     names_and_locks, lock_die, name_die, basic_partition,
  	     advanced_partition, basic_name_partition,
  	     stress_partition, simple_ring, simple_line, ring, line,
  