anchor.diff:  -export([init/1, dormant/3, running/3, handle_event/3,
   	 handle_sync_event/4, handle_info/3, terminate/3, code_change/4]).
   
  --record(state, { pids = none}).
  +-record(state, { pids = none,
  +		 monitored = none}).
   -define(SERVER, ?MODULE).
   
   %%====================================================================
  
positive.code: %%--------------------------------------------------------------------
  %%% Internal functions
  %%--------------------------------------------------------------------
  
negative.code: running(request_token, {From, _Tag}, S) ->
      {reply, wait, running, S#state{pids = queue:in(From, S#state.pids)}};
  running(release_token, _From, S) ->
      pass_token(S).
  
  
  %%--------------------------------------------------------------------
  %% Function:
  