anchor.diff:      do_size_check(Name, Init, Config).
   
   do_size_check(Name, Init, Config) ->
  -    io:format("do_size_check -> entry with"
  -              "~n   Name:   ~p"
  -              "~n   Config: ~p"
  -              "~n", [Name, Config]),
  -    Pre = fun() ->
  -                  {ok, Node} = ?ALIB:start_node(unique(Name)),
  -                  ok = run_on(Node, Init),
  -                  Node
  -          end,
  -    Case = fun(Node) ->
  -                   monitor_node(Node, true),
  -                   Pid = spawn_link(Node, fun() -> do_size_check(Config) end),
  -                   receive
  -                       {nodedown, Node} = N ->
  -                           exit(N);
  -                       {'EXIT', Pid, normal} ->
  -                           monitor_node(Node, false),                           
  -                           ok;
  -                       {'EXIT', Pid, ok} ->
  -                           monitor_node(Node, false),                           
  -                           ok;
  -                       {'EXIT', Pid, Reason} ->
  -                           monitor_node(Node, false),                           
  -                           exit(Reason)
  -                   end
  -           end,
  -    Post = fun(Node) ->
  -                   monitor_node(Node, true),
  -                   ?NPRINT("try stop node ~p", [Node]),
  -                   ?STOP_NODE(Node),
  -                   receive
  -                       {nodedown, Node} ->
  -                           ?NPRINT("node ~p stopped", [Node]),
  -                           ok
  -                   end
  -           end,
  -    io:format("do_size_check -> do test"
  -              "~n", []),
  -    ?TC_TRY(Name, Pre, Case, Post).
  -
  -run_on(Node, F) when is_atom(Node) andalso is_function(F, 0) ->
  -    monitor_node(Node, true),
  -    Pid = spawn_link(Node, F),
  -    receive
  -        {nodedown, Node} = N ->
  -            exit(N);
  -        {'EXIT', Pid, normal} ->
  -            monitor_node(Node, false),                           
  -            ok;
  -        {'EXIT', Pid, Reason} ->
  -            monitor_node(Node, false),                           
  -            Reason
  -    end.
  -    
  -unique(PreName) ->
  -    list_to_atom(?F("~w_~w", [PreName, erlang:system_time(millisecond)])).
  +    tc_try(Name, Init, fun() -> do_size_check(Config) end).
  +
   
   do_size_check(Config) ->
       ?IPRINT("do_size_check -> start with"
  
positive.code: 
  me_lookup(suite) -> [];
  me_lookup(Config) when is_list(Config) ->
      Prio       = normal,
      Verbosity  = trace,
      MibDir     = ?config(data_dir, Config),
  
negative.code: 
  load_unload(suite) -> [];
  load_unload(Config) when is_list(Config) ->
      tc_try(load_unload,
             fun() -> do_load_unload(Config) end).
  
  do_load_unload(Config) ->
      ?DBG("load_unload -> start", []),
  
      Prio       = normal,
  