anchor.diff:      end.
   
   poll_for_new_epoch_projection(P) ->
  -    poll_for_new_epoch_projection(P, 25).
  +    put(silly_poll_counter, 0),
  +    poll_for_new_epoch_projection(P, get_poll_retries()).
   
   poll_for_new_epoch_projection(P, 0) ->
       %% TODO: The client that caused the seal may have crashed before
  
positive.code:         NewEpoch when NewEpoch > Epoch ->
              corfurl:read_projection(Dir, NewEpoch);
          _ ->
              timer:sleep(50),
              poll_for_new_epoch_projection(P, Tries - 1)
      end.
  
  
negative.code:     error_logger:debug_msg("LPN ~p race lost: ~p\n", [LPN, Reason]).
  
  -endif. % TEST
  
  -ifdef(PULSE).
  get_poll_retries() ->
      9999*1000.
  
  get_poll_sleep_time() ->
      1.
  
  -else.
  get_poll_retries() ->
      25.
  
  get_poll_sleep_time() ->
      50.
  
  -endif.
  