anchor.diff:              end
       end.
   
  +busy_wait_until(Fun) ->
  +    case Fun() of
  +        true -> ok;
  +        _ ->
  +            busy_wait_until(Fun)
  +    end.
  +
   forever(Fun) ->
       Fun(),
       forever(Fun).
  
positive.code:          otp_5772_dist_link/1,
           otp_5772_monitor/1,
           otp_5772_dist_monitor/1,
           otp_7946/1]).
  
  -export([init_per_testcase/2, end_per_testcase/2]).
  
  
negative.code:     [links, dist_links, monitor_nodes, process_monitors,
       dist_process_monitors, busy_dist_port_monitor,
       busy_dist_port_link, otp_5772_link, otp_5772_dist_link,
       otp_5772_monitor, otp_5772_dist_monitor, otp_7946,
       otp_17127_local_link_with_simultaneous_link_unlink,
       otp_17127_dist_link_with_simultaneous_link_unlink,
       otp_17127_local_random, otp_17127_dist_random].
  
  init_per_testcase(Func, Config) when is_atom(Func), is_list(Config) ->
      case catch erts_debug:get_internal_state(available_internal_state) of
  