anchor.diff:      [receive {Pid, _} -> ok end || Pid <- Pids],
   
       [ok = m_stop(F) || F <- FLUs],
  -    _XX = event_get_all(), %% io:format(user, "XX ~p\n", [_XX]),
  +    _XX = event_get_all(), %%io:format(user, "XX ~p\n", [_XX]),
       event_shutdown(),
       ok.
   
  
positive.code:     error_trimmed = m_trim(F1, Epoch2),
  
      ok = m_stop(F1),
      _XX = event_get_all(), io:format(user, "XX ~p\n", [_XX]),
      event_shutdown(),
      ok.
  
  
negative.code: 
  event_add(Key, Who, Description) ->
      Tab = ?MODULE,
      E = {lamport_clock:get(), Key, Who, Description},
      %%io:format(user, "E = ~p\n", [E]),
      ets:insert(Tab, E).
  
  event_get_all() ->
      Tab = ?MODULE,
  