anchor.diff:      os:putenv("GLOBAL_HIGH_LEVEL_TRACE", "TRUE"),
       put(?nodes_tag, []).
   
  -loop_until_true(Fun, Config) ->
  +loop_until_true(Fun, Config, N) ->
  +    %% ?DBG([{n, N}]),
  +    put(n, N),
       case Fun() of
   	true ->
   	    true;
  
positive.code:                "~n   Regarding: ~p"
                 "~n   Waiter:    ~p"
                 "~n      Current Location: ~p"
                 "~n      Mesages:          ~p",
                 [ParentPid, Pid, pi(Pid, current_location), pi(Pid, messages)]),
              ct:fail("Timeout waiting for ready network")
  
      end.
  
negative.code:                                                 [ERes]),
                                               ERes;
                                           BadRes ->
                                               ?P("failed get nodes for ~p"
                                                  "~n      ~p",
                                                  [N, BadRes]),
                                               false
                                       end
  			     end,
  