anchor.diff:      end,
       state_set(msg_queue, NewMsgQueue, State).
   
  +-spec get_tombstones(State::state()) -> list({cb_status, cb_module()}).
  +get_tombstones(State) ->
  +    StateList = ?PDB:tab2list(State),
  +    Fun = fun ({{cb_status, CBModule}, Status}, Acc) ->
  +            if Status =:= tombstone -> [{cb_status, CBModule}|Acc];
  +               Status =/= tombstone -> Acc
  +            end;
  +        (_Entry, Acc) -> Acc end,
  +    lists:foldl(Fun, [], StateList).
  +
   
   %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   %% Misc
  
positive.code:     if H =:= Element -> true;
         H =/= Element -> contains(Element, List)
      end.
  
  
  
  
negative.code: 
  
  on_active({remove_all_tombstones}, State) ->
      TombstoneKeys = get_tombstones(State),
      lists:foreach(fun (Key) -> ?PDB:delete(Key, State) end, TombstoneKeys),
      State;
  
  