anchor.diff:  		      
       
   t([Case]) when is_atom(Case) ->
  -    io:format("~w:t -> entry with"
  -	      "~n   [Case]: [~p]", [?MODULE, Case]),
  +    %% p("t -> entry with"
  +    %% 	 "~n   [Case]: [~p]", [Case]),
       t(Case);
   t(Case) ->
  -    io:format("~w:t -> entry with"
  -	      "~n   Case: ~p", [?MODULE, Case]),
  +    %% p("t -> entry with"
  +    %% 	 "~n   Case: ~p", [Case]),
       process_flag(trap_exit, true),
       MEM = fun() -> case (catch erlang:memory()) of
   			{'EXIT', _} ->
  
positive.code: 		exit:{skipped, SkipReason} ->
  		    io:format(" => skipping suite: ~p~n", [SkipReason]),
  		    [{skipped, {Mod, init_per_suite}, SkipReason, 0}];
  		exit:{undef, _} ->
  		    [t({Mod, Case, Groups}, Config) || Case <- Cases];
  		T:E ->
  		    [{failed, {Mod, init_per_suite}, {T,E}, 0}]
  	    end;
          {'EXIT', {undef, _}} ->
  	    io:format("Undefined:   ~p~n", [{Mod, all}]),
  	    [{nyi, {Mod, all}, ok, 0}];
  		    
  	Crap ->
  	    Crap
      end;
  t(Bad, _Config) ->
      [{badarg, Bad, ok, 0}].
  
negative.code: %%     {Mod, Fun, ExpectedRes, ActualRes}
  %%----------------------------------------------------------------------
  
  tickets([Mod]) ->
      tickets(Mod);
  tickets(Mod) when is_atom(Mod) ->
      %% p("tickets -> entry with"
      %% 	      "~n   Mod: ~p", [Mod]),
      Res0 = t({Mod, {group, tickets}, Mod:groups()}, default_config()),
      Res  = lists:flatten(Res0),
      %% p("tickets(~w) -> Res: ~p~n", [Mod, Res]),
      display_result(Res),
      Res.
  
  