anchor.diff:            end ||  {Id, Pid, Type, _Module} <- ChildSpecs,
                     Pid =/= undefined, is_process_alive(Pid) ],
       ok.
  -
  +-endif.
   -spec sup_get_all_children(Supervisor::pid() | atom()) -> [pid()].
   sup_get_all_children(Supervisor) ->
       AllChilds = [X || X = {_, Pid, _, _} <- sup_which_children(Supervisor),
  
positive.code: %% @doc Kills all children of the given supervisor (recursively) after they
  %%      have been paused by sup_pause_childs/1.
  -spec sup_kill_childs(Supervisor::pid() | atom()) -> ok.
  sup_kill_childs(SupPid) ->
      ChildSpecs = sup_which_children(SupPid),
      _ = [ try
  
negative.code:                   supervisor -> sup_kill_childs(Pid);
                    worker     -> ok
                end,
                Tables = util:ets_tables_of(Pid),
                _ = supervisor:terminate_child(SupPid, Id),
                _ = supervisor:delete_child(SupPid, Id),
                util:wait_for_process_to_die(Pid),
  