anchor.diff:  -compile(export_all).
   -define (COMET_INTERVAL, 10 * 1000).
   -define (TEN_SECONDS, 10 * 1000).
  +-define (TWENTY_SECONDS, 10 * 1000).
   
   % Comet and polling/continuations are now handled using Nitrogen's asynchronous
   % processing scheme. This allows you to fire up an asynchronous process with the
  
positive.code:         Message ->
              [Pid!Message || Pid <- Processes],
              pool_loop(Processes)
      end.
  
  
  
negative.code:             accumulator_loop(Guardians, Actions, Waiting, NewTimerRef);
  
          die -> 
              % Guardian_process will detect that we've died and update
              % the pool.
              erlang:exit({accumulator_loop, exiting_lease_expired});
  
          Other ->
              ?PRINT({accumulator_loop, unhandled_event, Other}),
              accumulator_loop(Guardians, Actions, Waiting, TimerRef)
  
      after ?TWENTY_SECONDS ->
          %% If we have no TimerRef, then the browser never performed
          %% the callback, so kill this process after 20 seconds.
          case TimerRef == undefined of
              true  -> erlang:exit({accumulator_loop, timeout});
              false -> accumulator_loop(Guardians, Actions, Waiting, TimerRef)
          end
      end.
  
  % The guardian process monitors the running AsyncFunction and
  