anchor.diff:      end.
   
   starter(Host, Name, Args) ->
  -    case os:type() of
  -        vxworks ->
  -            test_server:start_node(Name, slave, [{args,Args}]);
  -        _ ->
  -            slave:start(Host, Name, Args)
  -    end.
  +    slave:start(Host, Name, Args).
   
   slave_sup() ->
       process_flag(trap_exit, true),
       receive
           {'EXIT', _, _} -> 
  -            case os:type() of
  -                vxworks ->
  -                    erlang:halt();
  -                _  ->
  -                    ignore
  -            end
  +	    ignore
       end.
   
   
  
positive.code: fts_ftp_file_ssl_api(doc) -> ["CosFileTransfer FTP FileTransferSession API tests.", ""];
  fts_ftp_file_ssl_api(suite) -> [];
  fts_ftp_file_ssl_api(Config) ->
      case os:type() of
          vxworks ->
  	    {skipped, "No SSL-support for VxWorks."};
          _ ->
  	    ?line {ok, Node} = create_node("ftp_file_api_ssl", {4005, 1}, ssl),
  	    file_helper(Config, 'FTP', ?TEST_DIR, Node, 4005, "ftp_file_api_ssl", ssl)
      end.
  
  fts_native_file_api(doc) -> ["CosFileTransfer NATIVE FileTransferSession API tests.", ""];
  fts_native_file_api(suite) -> [];
  
negative.code: 
  stopper(Node, Type) ->
      catch stop_orber_remote(Node, Type),
      slave:stop(Node).
  -endif.
    
  %%------------------------------------------------------------
  