anchor.diff:  %%      an appropriate breakpoint.
   -spec sup_pause_childs(Supervisor::pid() | atom()) -> ok.
   sup_pause_childs(SupPid) ->
  -    ChildSpecs = supervisor:which_children(SupPid),
  +    ChildSpecs = sup_which_children(SupPid),
       Self = self(),
       _ = [ begin
                 case Type of
  
positive.code:     end.
  
  show_started_childs(Prefix, SupRef) ->
      Childs = supervisor:which_children(SupRef),
      show_childs(Prefix, Childs).
  
  show_childs(_Prefix, []) -> ok;
  
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.
  