anchor.diff:      {match_spec,Prog} = trace_info({erlang,process_info,2}, match_spec),
       ok.
   
  -return_trace(doc) -> "Test the new return trace.";
  -return_trace(suite) -> [];
  -return_trace(Config) when is_list(Config) ->
  -    return_trace().
  +return_trace(_Config) ->
  +    case test_server:is_native(lists) of
  +	true -> {skip,"lists is native"};
  +	false -> return_trace()
  +    end.
   
   return_trace() ->
       X = {save,me},
  
positive.code:     ?line {match_spec,Prog2} = trace_info({erlang,atom_to_list,1}, match_spec),
  
      ?line lists:seq(2, 7),
      ?line atom_to_list(non_literal(nisse)),
      ?line expect({trace,Self,return_from,{lists,seq,2},[2,3,4,5,6,7]}),
      ?line expect({trace,Self,return_from,{erlang,atom_to_list,1},"nisse"}),
  
  
negative.code: nasty() ->
      exit(good_bye).
  
  exception_trace(_Config) ->
      case test_server:is_native(lists) of
  	true -> {skip,"lists is native"};
  	false -> exception_trace()
      end.
  
  exception_trace() ->
      X = {save,me},
  