anchor.diff:  	    R ! {self(), accept},
   	    gserv_loop(GS, RS, Rnum-1);
   	{From, done_client, Int} ->
  -	    GS2 = GS#gs{sessions = GS#gs.sessions + 1,
  -			reqs = GS#gs.reqs + Int},
  -	    if
  +	    GS2 = if
  +		      Int == 0 -> GS;
  +		      Int > 0 -> GS#gs{sessions = GS#gs.sessions + 1,
  +				       reqs = GS#gs.reqs + Int}
  +		  end,
  +    if
   		Rnum == 8 ->
   		    From ! {self(), stop},
   		    gserv_loop(GS2, Ready, Rnum);
  
positive.code: 	    yaws_debug:derror("Failed to accept: ~p~n", [ERR]),
  	    exit(normal)
      end.
       
  
  
  %%%----------------------------------------------------------------------
  
negative.code:     ?Debug("wait in accept ... ~n",[]),
      gen_tcp:accept(GS#gs.l);
  do_accept(GS) when GS#gs.ssl == ssl ->
      ssl:accept(GS#gs.l,10000).
  
  
  initial_acceptor(GS=#gs{ssl=nossl})->
      acceptor(GS);
  initial_acceptor(GS=#gs{ssl=ssl}) ->
      initial_acceptor(GS, 5).
  
  initial_acceptor(GS, 0) ->
      ok;
  initial_acceptor(GS, 1) ->
      acceptor(GS);
  initial_acceptor(GS, N) when N>1 ->
      Self = self(),
      proc_lib:spawn_link(fun() ->
  				receive
  				after (N-1)*2000 ->
  					acceptor0(GS, Self)
  				end
  			end),
      initial_acceptor(GS, N-1).
  
  
  
  acceptor(GS) ->
  