anchor.diff:  eprof() ->
       eprof:start(),
       eprof:profile(pids()),
  -    io:format("Ok run some traffic \n", []).
  +    debug_format("Ok run some traffic \n", []).
   
   
   
  
positive.code:                           [Fstr, node(), filename:basename(File),
                             Line, self()])),
  
      case (catch io:format(user, Str ++ Fmt ++ "~n", Args)) of
          ok -> ok;
          _ -> io:format(user, "ERROR ~p:~p: Pid ~w: (bad format)~n~p,~p~n",
                         [File, Line, self(), Fmt, Args]),
  
               ok
      end;
  
  fail({format, File,Line,Fmt,Args}) ->
      case (catch io:format(user, Fmt,Args)) of
          ok -> ok;
          _ ->
              io:format(user, "ERROR ~p:~p: Pid ~w: (bad format)~n~p,~p~n",
                        [File, Line, self(), Fmt, Args]),
  
              ok
      end.
  
  format(F, A) ->
      format(get(gc), F, A).
  format(GC, F, A) ->
      case ?gc_has_debug(GC) of
          true ->
              io:format("yaws:" ++ F, A);
          false ->
              ok
      end.
  
negative.code:     fail(Failure).
  
  fail({assert,File,Line,Message}) ->
      debug_format(user, "Assertion FAILED ~p:~p, pid ~w exiting: ~p~n",
                [File, Line, self(), Message]),
      erlang:error(assertion_failed);
  fail({alert,File,Line,Message}) ->
      debug_format(user, "Assert WARNING ~p:~p, pid ~w: ~p~n",
                [File, Line, self(), Message]),
      ok;
  fail({{debug,Fstr}, File,Line,Fmt, Args}) ->
  