anchor.diff:    Request = #request{sock = Sock},
     State2 = receive_term(Request, State),
     {noreply, State2};
  -handle_cast({asset_freed}, State) ->
  +handle_cast(kick, State) ->
     case queue:out(State#state.pending) of
       {{value, Request}, Pending2} ->
  -      State2 = process_request(Request, State#state{pending = Pending2}),
  +      State2 = process_request(Request, Pending2, State),
         {noreply, State2};
       {empty, _Pending} ->
         {noreply, State}
  
positive.code:     {ok, Asset} ->
        logger:debug("Leased asset for pool ~p~n", [Pid]),
        spawn(fun() -> process_now(Pid, Request, Asset) end),
        State2;
      empty ->
        logger:debug("Post queueing request for pool ~p~n", [Pid]),
        Pending2 = queue:in(Request, State#state.pending),
        State2#state{pending = Pending2}
    end.
  
  process_now(Pid, Request, Asset) ->
  
negative.code:   spawn(fun() -> native:process(ActionTerm, Request) end),
    State2.
  
  process_extern_request(Pid, Request, Pending2, State) ->
    Count = State#state.count,
    State2 = State#state{count = Count + 1},
    logger:debug("Count = ~p~n", [Count + 1]),
  