anchor.diff:      {noreply, S};
   handle_info({'EXIT', _, Reason}, #state{ reply = FromTag } = S) ->
   
  -    set_process_trace(false, S#state.rootset),
  -    set_pattern_trace(false, S#state.pattern),
  +    _  = set_process_trace(false, S#state.rootset, S#state.trace_opts),
  +    ok = set_pattern_trace(false, S#state.pattern),
   
       gen_server:reply(FromTag, {error, Reason}),
       {noreply, S#state{
  -	profiling = false,
  -	rootset   = [],
  -	pattern   = {'_','_','_'}
  +	profiling  = false,
  +	rootset    = [],
  +	trace_opts = [],
  +	pattern    = ?default_pattern
       }};
   
   % check if Pid is spawned process?
   handle_info({_Pid, {answer, Result}}, #state{ reply = {From,_} = FromTag} = S) ->
   
  -    set_pattern_trace(pause, S#state.pattern),
  -
  -    Bpd = collect_bpd(),
  -
  -    set_process_trace(false, S#state.rootset),
  -    set_pattern_trace(false, S#state.pattern),
  +    ok   = set_pattern_trace(pause, S#state.pattern),
  +    Bpd  = collect_bpd(),
  +    _    = set_process_trace(false, S#state.rootset, S#state.trace_opts),
  +    ok   = set_pattern_trace(false, S#state.pattern),
   
       catch unlink(From),
       gen_server:reply(FromTag, {ok, Result}),
       {noreply, S#state{
  -	profiling = false,
  -	rootset   = [],
  -	pattern   = {'_','_','_'},
  -	bpd       = Bpd
  +	profiling  = false,
  +	rootset    = [],
  +	trace_opts = [],
  +	pattern    = ?default_pattern,
  +	bpd        = Bpd
       }}.
   
   %% -------------------------------------------------------------------- %%
  
positive.code: 	mfa = []                 % list of {Mfa, {Count, Us}}
      }).
  
  -record(state, {
  	profiling = false,
  	pattern   = {'_','_','_'},
  	rootset   = [],
  	fd    = undefined,
  	start_ts  = undefined,
  	reply     = undefined,
  	bpd       = #bpd{}
      }).
  
  
  
negative.code: %% -------------------------------------------------------------------- %%
  
  terminate(_Reason, #state{ fd = undefined }) ->
      ok = set_pattern_trace(false, ?default_pattern),
      ok;
  terminate(_Reason, #state{ fd = Fd }) ->
      ok = file:close(Fd),
      ok = set_pattern_trace(false, ?default_pattern),
      ok.
  
  %% -------------------------------------------------------------------- %%
  