anchor.diff:          end,
       io:format("******* ClientProf:~n", []), prof_print(ClientProf),
       io:format("******* ServerProf:~n", []), prof_print(ServerProf),
  +    io:format("******* Server GC Before:~n~p~n", [Server_GC_Before]),
  +    io:format("******* Server GC After:~n~p~n", [Server_GC_After]),
       Speed = round((Bytes * 1000000) / (1024 * Time)),
       report(Prefix++" Throughput_"++integer_to_list(Size), Speed, "kB/s").
   
  
positive.code: 
  
  throughput_server(Pid, N) ->
      msacc:available() andalso
          begin
              msacc:stop(),
  
negative.code:     ok.
  -elif(?prof =:= eprof).
  prof_start() ->
      catch eprof:stop(),
      {ok,_} = eprof:start(),
      profiling = eprof:start_profiling(processes()),
      ok.
  