anchor.diff:                          msg_delay:send_local(
                             1, self(),
                             {check_delayed_del_watching_of, WatchedPid, Time}),
  -                        rempid_set_last_modified(TmpEntry, Time);
  +                        T2 = rempid_set_last_modified(TmpEntry, Time),
  +                        rempid_set_pending_demonitor(T2, true);
                       {0, true} -> %% dec to 0 and no new delayed message needed
                           TmpEntry;
                       _ -> TmpEntry
  
positive.code:           end
            || {X, Cookie} <- Subscriptions ],
      %% delete from remote_pids
      NewRemPids = lists:delete(WatchedPid, state_get_rem_pids(State)),
      S1 = state_set_rem_pids(State, NewRemPids),
      %% delete subscription entries with this pid
      lists:foldl(fun({Sub, Cook}, StAgg) ->
  
negative.code:                             fd -> comm:send(RemHBS, {del_watching_of_via_fd, comm:this(), WatchedPid});
                              _ -> comm:send(RemHBS, {del_watching_of, WatchedPid})
                          end,
                          lists:keydelete(WatchedPid, 1, RemPids);
                      _ ->
                          NewEntry =
                              case rempid_refcount(Entry) of
  