anchor.diff:      util:wait_for_process_to_die(Pid),
       % wait a bit for the rm-processes to settle
       timer:sleep(500),
  -    proto_sched(start),
       Config.
   
   end_per_testcase(_TestCase, _Config) ->
  -    proto_sched(stop),
       unittest_helper:stop_ring(),
       ok.
   
  
positive.code:         ?SCALARIS_RECV(X,
                         ?ct_fail("slide_~.0p(~B.~B, ~.0p, ~.0p, ~.0p) unexpected message: ~.0p",
                                  [PredOrSucc, NthNode, N, Node, Other, TargetId, X]))
      end.
  
  -spec stop_time(F::fun(() -> any()), Tag::string()) -> ok.
  stop_time(F, Tag) ->
  
negative.code:                     proto_sched:start_deliver();
                  stop ->
                      proto_sched:stop(),
                      ct:pal("Proto scheduler stats: ~.2p", proto_sched:get_infos()),
                      proto_sched:cleanup()
              end;
          _ -> ok
  