anchor.diff:           thttp = counter:add(idle, Thttp),
            trecv = counter:add(now,  Trecv)
         }, 
  -      0
  +      0 % sometimes timeout is arrived later then data packet
      }.
   
   %%%------------------------------------------------------------------
  
positive.code: %%% ACTIVE
  %%%
  %%%------------------------------------------------------------------   
  'ACTIVE'({Prot, _Peer, terminated}, #fsm{prot=P}=S)
   when Prot =:= P ->
     {stop, normal, S};
  
negative.code:          if 
              % this is last chunk
              Len =:= 0 -> 
                 {emit, {http, Uri, eof}, 'ACTIVE', S};
              % this is interim chunk   
              true      ->
                 parse_chunk(S#fsm{iolen=Len, buffer=Data})
  