anchor.diff:  	    ?match(true, (Count1 == Count3)),
   
   
  -	    ?line ?match(false, corba_object:non_existent(FSS)),
  -	    ?line ?match(false, corba_object:non_existent(FST)),
  -	    ?line ?match(ok, 'CosFileTransfer_FileTransferSession':logout(FSS)),
  -	    ?line ?match(ok, 'CosFileTransfer_FileTransferSession':logout(FST)),
  +	    ?match(false, corba_object:non_existent(FSS)),
  +	    ?match(false, corba_object:non_existent(FST)),
  +	    ?match(ok, 'CosFileTransfer_FileTransferSession':logout(FSS)),
  +	    ?match(ok, 'CosFileTransfer_FileTransferSession':logout(FST)),
               %% To make sure Orber can remove it from mnesia.
   	    timer:sleep(2000),
  -	    ?line ?match(true, corba_object:non_existent(FSS)),
  -	    ?line ?match(true, corba_object:non_existent(FST)),
  -	    ?line ?match(ok, remote_apply(Node, ?MODULE, uninstall_data, [Name])),
  +	    ?match(true, corba_object:non_existent(FSS)),
  +	    ?match(true, corba_object:non_existent(FST)),
  +	    ?match(ok, remote_apply(Node, ?MODULE, uninstall_data, [Name])),
   	    stop_orber_remote(Node, normal),
   	    ok
       end.
  
positive.code: %%-----------------------------------------------------------------
  
  init_per_testcase(_Case, Config) ->
      ?line Dog=test_server:timetrap(?default_timeout),
      [{watchdog, Dog}|Config].
  
  
  end_per_testcase(_Case, Config) ->
      Dog = ?config(watchdog, Config),
      test_server:timetrap_cancel(Dog),
      ok.
  
  
negative.code:     [_, Host] = ?match([_,_],string:tokens(atom_to_list(node()), [$@])),
      case starter(Host, Name, Args) of
  	{ok, NewNode} ->
              ?match(pong, net_adm:ping(NewNode)),
              {ok, Cwd} = file:get_cwd(),
              Path = code:get_path(),
              ?match(ok, rpc:call(NewNode, file, set_cwd, [Cwd])),
              true = rpc:call(NewNode, code, set_path, [Path]),
  	    ?match(ok, start_orber_remote(NewNode, Type, Options, Port)),
              spawn_link(NewNode, ?MODULE, slave_sup, []),
  