anchor.diff:                      C:{skip, _} = E:_ when ((C =:= throw) orelse
                                               (C =:= exit)) ->
                           E;
  +                    exit:{suite_failed, {{Reason, _CS},_MFA}, Mod, Line}:_ ->
  +                        {skip, {Reason, Mod, Line}};
  +                    exit:{suite_failed, Reason, Mod, Line}:_ ->
  +                        {skip, {Reason, Mod, Line}};
                       C:E:_ when ((C =:= throw) orelse
                                   (C =:= exit)) ->
                           {skip, {catched, C, E}}
  
positive.code:     ?IPRINT("init_per_testcase end when"
              "~n      Nodes:  ~p"
              "~n      Result: ~p"
              "~n~n", [Result, erlang:nodes()]),
      Result.
  
  init_per_testcase2(Case, Config) ->
  
negative.code:     StopMnesiaRes = fin_mnesia(Node),
      StopNode      = stop_node(Node),
      ?IPRINT("fin_agent -> stop apps and (agent node ~p) node results: "
              "~n   SNMP Agent: ~p"
              "~n   Crypto:     ~p"
              "~n   Mnesia:     ~p"
              "~n   Node:       ~p", 
              [Node, StopAgentRes, StopCryptoRes, StopMnesiaRes, StopNode]),
      Config.
  
  