anchor.diff:          error ->
               {StableSeq, PendingTS0} = {0, []}
       end,
  -    Labels1 = orddict:append(TimeStamp, Label, Labels0),
  +    Labels1 = orddict:append(TimeStamp, {Now, Label}, Labels0),
       case ((StableSeq + 1) == Seq) of
           true ->
               S1 = update_vclock(Seq, PendingTS0, Partition, TimeStamp, S0#state{labels=Labels1}),
  
positive.code:                 {ok, Stream, {Host, Port}} ->
                      saturn_leaf_propagation_fsm_sup:start_fsm([Port, Host, {new_stream, Stream, MyId}])
              end,
              filter_labels(Rest, StableTime, MyId);
          false ->
              [H|Rest]
      end.
  
  -ifdef(TEST).
  
  
negative.code:             S0#state{vclock=VClock1, seqs=Seqs1}
      end.
  
  deliver_labels(S0=#state{vclock=Clocks, labels=Labels0, myid=MyId, delay=Delay}) ->
      StableTime = compute_stable_time(Clocks),
      Labels1 = filter_labels(Labels0, StableTime, MyId, Delay),
      S0#state{labels=Labels1}.
  
  compute_stable_time(Clocks) ->
  