anchor.diff:  
   -spec web_debug_info(State::state()) -> [{_,_}, ...].
   web_debug_info(State) ->
  +    CBModules = state_get(cb_modules, State),
  +    Tombstones = lists:map(fun ({cb_status, CBModule}) -> CBModule end, get_tombstones(State)),
       _KeyValueList =
  -        [{"behaviour module",    ""},
  -         {"msg_queue_len",       length(state_get(msg_queue, State))}].
  +        [{"behaviour module",   ""},
  +         {"msg_queue_len",      length(state_get(msg_queue, State))},
  +         {"status",             state_get(status, State)},
  +         {"registered modules", to_string(CBModules)},
  +         {"tombstones",         to_string(Tombstones)}
  +     ].
   
   
   -spec contains(Element::any(), List::list()) -> boolean().
  
positive.code:     if H =:= Element -> true;
         H =/= Element -> contains(Element, List)
      end.
  
  
  
  
negative.code:     % stop all gossip tasks
      lists:foreach(fun (CBModule) -> handle_msg({stop_gossip_task, CBModule}, State) end,
          state_get(cb_modules, State)),
  
      % cleanup state
      state_set(status, uninit, State),
  