anchor.diff:  %% Tests that trace(Pid, How, ['receive']) works.
   
   receive_trace(Config) when is_list(Config) ->
  -    Receiver = fun_spawn(fun receiver/0),
  +    Receiver = proplists:get_value(receiver, Config),
   
       %% Trace the process; make sure that we receive the trace messages.
       1 = erlang:trace(Receiver, true, ['receive']),
  
positive.code: %%% Tests the trace BIF.
  %%%
  
  -export([all/0, suite/0, link_receive_call_correlation/0,
           receive_trace/1, link_receive_call_correlation/1, self_send/1,
  	 timeout_trace/1, send_trace/1,
  	 procs_trace/1, dist_procs_trace/1, procs_new_trace/1,
  
negative.code: send_trace(Config) when is_list(Config) ->
      process_flag(trap_exit, true),
      Sender = fun_spawn(fun sender/0),
      Receiver = proplists:get_value(receiver, Config),
  
      %% Check that a message sent to another process is traced.
      1 = erlang:trace(Sender, true, [send]),
  