anchor.diff:              % pop off the current server and move to the warm up phase
               % for the next server
               State2 = State#state{servers=Rest},
  -            ok = do_warmup(State2),
  +            do_warmup(State2),
               {next_state, warmup, State2}
       end.
   
  
positive.code:                                DB, Host, Port, Clients, Seconds).
      
  do_warmup(State) ->
      WarmupCallback = fun(done) ->
                               % send the full test event
                               run_fulltest();
                          (cancel) ->
                               pass
                   end,
      [Server|_] = State#state.servers,
      do_atest(WarmupCallback, Server ++ "-warmup", State).
      
  
  
negative.code: %% ------------------------------------------------------------------
  %% Internal Function Definitions
  %% ------------------------------------------------------------------
  start_server(ServerName) ->
      error_logger:info_msg("Starting ~w~n", [ServerName]),
      {message, "started"} = wsdemo_server_manager:start_server(ServerName),
  
      % wait for the server to come up... TODO: Send a synchronous ping to the server
      timer:sleep(1000).
  
  stop_server(ServerName) ->
      error_logger:info_msg("Stopping Server", [ServerName]),
      {message, "server stopped"} = wsdemo_server_manager:stop_server().
      
  next_server() ->
      gen_fsm:send_event(?SERVER, next_server).
  
  