anchor.diff:      ct:log("Starting scheduler utilization run on ~w and ~w", [A, B]),
       {ClientMsacc, ServerMsacc, Msgs} =
           ssl_apply(
  -          HA, fun () -> sched_util_runner(A, B, Effort, SSL, PrivDir) end),
  +          HA,
  +          fun () ->
  +                  Result = sched_util_runner(A, B, Effort, SSL, PrivDir),
  +                  fs_log(
  +                    PrivDir,
  +                    "sched_utilization.Result", Result),
  +                  Result
  +          end),
       ct:log("Got ~p busy_dist_port msgs",[length(Msgs)]),
       [B] = ssl_apply(HA, erlang, nodes, []),
       [A] = ssl_apply(HB, erlang, nodes, []),
  
positive.code:         [erlang:spawn_link(
             B, fun () -> throughput_server() end)
           || _ <- lists:seq(1, Senders)],
      ServerMsacc =
          erlang:spawn(
            B,
            fun() ->
                    receive
                        {start,Pid} ->
                            msacc:start(Time),
                            receive
                                {done,Pid} ->
                                    fs_log(PrivDir,
                                           "sched_util_runner.msacc:stats",
                                           ok),
  
negative.code: sched_util_runner(A, B, Effort, false, PrivDir) ->
      sched_util_runner(A, B, Effort, 250, PrivDir);
  sched_util_runner(A, B, Effort, Senders, PrivDir) ->
      process_flag(trap_exit, true),
      Payload = payload(5),
      Time = 1000 * Effort,
      [A] = rpc:call(B, erlang, nodes, []),
  