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:                 Error ->
                      progress("~nFailed to start ~p reason ~p~n", [Child, Error]),
                      progress("Supervisor ~p has childs: ~p~n",
                                [SupRef, sup_which_children(SupRef)]),
                      Error
              end,
              Res;
  