anchor.diff:      end.
   
   show_started_childs(Prefix, SupRef) ->
  -    Childs = supervisor:which_children(SupRef),
  +    Childs = sup_which_children(SupRef),
       show_childs(Prefix, Childs).
   
   show_childs(_Prefix, []) -> ok;
  
positive.code: %%      have been paused by sup_pause_childs/1.
  -spec sup_kill_childs(Supervisor::pid() | atom()) -> ok.
  sup_kill_childs(SupPid) ->
      ChildSpecs = supervisor:which_children(SupPid),
      _ = [ try
                case Type of
                    supervisor -> sup_kill_childs(Pid);
  
negative.code:     sup_terminate_childs(SupPid),
      case is_pid(SupPid) of
          true -> exit(SupPid, kill);
          false ->
              case whereis(SupPid) of
                  SupPid2 when is_pid(SupPid2) -> exit(SupPid2, kill);
                  _ -> ok
              end
      end,
      util:wait_for_process_to_die(SupPid),
      ok.
  