anchor.diff:  	false ->
   	    ok
       end,
  -    ?line rpc:call(Node, code, del_path, [Priv]),
  -    ?line rpc:call(Node, code, add_pathz, [Priv]),
  +    rpc:call(Node, code, del_path, [Priv]),
  +    rpc:call(Node, code, add_pathz, [Priv]),
   
       FullModName = Priv ++ "/code_cache_test",
  -    ?line {ok,Dev} = file:open(FullModName ++ ".erl", [write]),
  -    ?line io:format(Dev, "-module(code_cache_test). -export([a/0]). a() -> ok.~n", []),
  -    ?line ok = file:close(Dev),
  -    ?line {ok,code_cache_test} = compile:file(FullModName, [{outdir,Priv}]),
  +    {ok,Dev} = file:open(FullModName ++ ".erl", [write]),
  +    io:format(Dev, "-module(code_cache_test). -export([a/0]). a() -> ok.~n", []),
  +    ok = file:close(Dev),
  +    {ok,code_cache_test} = compile:file(FullModName, [{outdir,Priv}]),
   
       F = fun load_loop/2,
       N = 1000,
  -    ?line {T0,T1} = rpc:call(Node, erlang, apply, [F, [N,code_cache_test]]),
  +    {T0,T1} = rpc:call(Node, erlang, apply, [F, [N,code_cache_test]]),
       TNoCache = now_diff(T1, T0),
  -    ?line rpc:call(Node, code, rehash, []),
  -    ?line {T2,T3} = rpc:call(Node, erlang, apply, [F, [N,code_cache_test]]),
  -    ?line TCache = now_diff(T3, T2),
  +    rpc:call(Node, code, rehash, []),
  +    {T2,T3} = rpc:call(Node, erlang, apply, [F, [N,code_cache_test]]),
  +    TCache = now_diff(T3, T2),
       AvgNoCache = TNoCache/N,
       AvgCache = TCache/N,
  -    ?line io:format("Avg. load time (no_cache/cache): ~w/~w~n", [AvgNoCache,AvgCache]),
  +    io:format("Avg. load time (no_cache/cache): ~w/~w~n", [AvgNoCache,AvgCache]),
       ?t:stop_node(Node),
       if AvgNoCache =< AvgCache ->
   	    ?t:fail("Cache not working properly.");
  
positive.code:     P=code:get_path(),
      [{watchdog, Dog}, {code_path, P}|Config].
  
  end_per_testcase(TC, Config) when TC == mult_lib_roots; 
  				  TC == big_boot_embedded ->
      {ok, HostName} = inet:gethostname(),
      NodeName = list_to_atom(atom_to_list(TC)++"@"++HostName),
  
negative.code: 		       "files as pathnames (known previous bug)"];
  set_path_file(Config) when is_list(Config) ->
      File=filename:join(?config(priv_dir, Config), "testfil"),
      ok=file:write_file(File, list_to_binary("lite data")),
      {error, bad_directory}=code:set_path([File]).
  
  sticky_dir(suite) -> [];
  sticky_dir(doc) -> ["Test that a module with the same name as a module in ",
  		    "a sticky directory cannot be loaded."];
  sticky_dir(Config) when is_list(Config) ->
      MyDir=filename:dirname(code:which(?MODULE)),
      {ok, Node}=?t:start_node(sticky_dir, slave,[{args, "-pa \""++MyDir++"\""}]),
      File=filename:join([?config(data_dir, Config), "calendar"]),
      Ret=rpc:call(Node, ?MODULE, sticky_compiler, [File]),
      case Ret of
  	fail ->
  	    ?t:fail("c:c allowed a sticky module to be compiled and loaded.");
  