anchor.diff:  load_cached(doc) ->
       [];
   load_cached(Config) when is_list(Config) ->
  -    ?line Priv = ?config(priv_dir, Config),
  -    ?line WD = filename:dirname(code:which(?MODULE)),
  -    ?line {ok,Node} = 
  +    Priv = ?config(priv_dir, Config),
  +    WD = filename:dirname(code:which(?MODULE)),
  +    {ok,Node} =
   	?t:start_node(code_cache_node, peer, [{args,
   					       "-pa \"" ++ WD ++ "\""},
   					      {erl, [this]}]),
  
positive.code:     end.
  
  ext_mod_dep2() ->
      Exports0 = code_server:module_info(exports) -- 
  	[{module_info,0},{module_info,1}],
      Exports = [{code_server,M,A} || {M,A} <- Exports0],
      case analyse(Exports, [], [], 0) of
  
negative.code:     xref:add_directory(s, filename:join(code:lib_dir(kernel),"ebin")),
      xref:add_directory(s, filename:join(code:lib_dir(stdlib),"ebin")),
      case catch ext_mod_dep2() of
  	{'EXIT', Reason} ->
  	    xref:stop(s),
  	    exit(Reason);
  	Else ->
  