anchor.diff:  
   %%=======================================================================
   
  -accept_get_longpoll(_Config) ->
  -  Url = <<"http://localhost:7080/dbs/testdb/docs?feed=longpoll">>,
  +accept_get_longpoll_heartbeat(_Config) ->
  +  Url = <<"http://localhost:7080/dbs/testdb/docs?feed=longpoll&heartbeat=10">>,
     Opts = [async, {recv_timeout, infinity}],
  -  LoopFun = fun(Loop, Ref) ->
  +  LoopFun = fun(Loop, {Ref, N}=Acc) ->
                   receive
                     {hackney_response, Ref, {status, StatusInt, _Reason}} ->
                       200 = StatusInt,
  -                    Loop(Loop, Ref);
  +                    Loop(Loop, Acc);
                     {hackney_response, Ref, {headers, _Headers}} ->
  -                    Loop(Loop, Ref);
  +                    Loop(Loop, Acc);
                     {hackney_response, Ref, done} ->
  -                    ok;
  +                    {ok, N};
                     {hackney_response, Ref, <<>>} ->
  -                    Loop(Loop, Ref);
  +                    Loop(Loop, Acc);
  +                  {hackney_response, Ref, <<"\n">>} ->
  +                    Loop(Loop, {Ref, N+1});
                     {hackney_response, Ref, Bin} ->
                       R = jsx:decode(Bin,[return_maps]),
                       Results = maps:get(<<"results">>, R),
                       [_OnlyOneChange] = Results,
  -                    Loop(Loop, Ref);
  +                    Loop(Loop, Acc);
   
                     Else ->
                       ct:fail("Unexpected answer from longpoll: ~p", [Else]),
  
positive.code: 
  -export([ accept_get_normal/1
          , accept_get_history_all/1
          , accept_get_longpoll/1
          , accept_get_longpoll_heartbeat/1
          , accept_get_eventsource/1
          , reject_store_unknown/1
  
negative.code:             end,
    Headers = [{<<"Content-Type">>, <<"application/json">>},
               {<<"A-IM">>, <<"Incremental feed">>}],
  
    {ok, ClientRef} = hackney:get(Url, Headers, <<>>, Opts),
    CatRevId = put_cat(),
    {ok, NbHeartBeats1} = LoopFun(LoopFun, {ClientRef, 0}),
    true = NbHeartBeats1 >= 1,
  
    Url2 = <<Url/binary, "&since=1">>,
    {ok, ClientRef2} = hackney:get(Url2, Headers, <<>>, Opts),
    delete_cat(CatRevId),
    {ok, NbHeartBeats2} =  LoopFun(LoopFun, {ClientRef2, 0}),
    true = NbHeartBeats2 >= 1,
    ok.
  
  %%=======================================================================
  