anchor.diff:                   32768
            end,
       {ok, Sock} = gen_udp:open(Port, [binary, {active, false}, {recbuf, RB}]),
  -    loop(self()),
  +    loop(?FAST_LOOP_CNT),
       {ok, #state{sock=Sock, port=Port}}.
   
   %%--------------------------------------------------------------------
  
positive.code: %%                                  {stop, Reason, State}
  %% @end
  %%--------------------------------------------------------------------
  handle_cast(loop, State = #state{sock=S}) ->
      case gen_udp:recv(S, 8192, 1000) of
          {ok, {_Address, _Port, D}} ->
              handle_data(D);
          _ ->
              ok
      end,
      loop(),
      {noreply, State};
  
  handle_cast(_Msg, State) ->
      {noreply, State}.
  
negative.code:          terminate/2, code_change/3]).
  
  -define(SERVER, ?MODULE).
  -define(FAST_LOOP_CNT, 10000).
  
  -record(state, {sock, port}).
  
  