anchor.diff:  		      [self(), Mod, Line] ++ Args)
       end.
   
  +skip(Reason) ->
  +    exit({skip, Reason}).
  +
   skip(Actual, File, Line) ->
  -    log("Skipping test case~n", [], File, Line),
  -    String = lists:flatten(io_lib:format("Skipping test case ~p(~p): ~p~n",
  -					 [File, Line, Actual])),
  -    exit({skipped, String}).
  +    log("Skipping test case: ~p~n", [Actual], File, Line),
  +    String = f("~p(~p): ~p~n", [File, Line, Actual]),
  +    skip(String).
   
   fatal_skip(Actual, File, Line) ->
       error(Actual, File, Line),
  -    exit({skipped, {fatal, Actual, File, Line}}).
  +    skip({fatal, Actual, File, Line}).
  +
   
   
   %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
positive.code:     Ok           = [{MF, Time} || {ok,  MF, _, Time}  <- Res],
      Nyi          = [MF || {nyi, MF, _, _Time} <- Res],
      SkippedGrps  = [{{M,G}, Reason} || 
  		       {skipped, {M, {group, G}}, Reason, _Time} <- Res],
      SkippedCases = [{MF, Reason} || 
  		       {skipped, {_M, F} = MF, Reason, _Time} <- Res, 
  		       is_atom(F)],
      FailedGrps   = [{{M,G}, Reason} || 
  		       {failed,  {M, {group, G}}, Reason, _Time} <- Res],
  
negative.code:     after 1000 ->
  	    []
      end.
  
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  %% Check if process is alive and kicking
  still_alive(Pid) ->   
  