anchor.diff:  maybe_register_with_parent_async(undefined) ->
       ok;
   maybe_register_with_parent_async(Pid) ->
  -    register_with_parent_async(Pid).
  -
  -register_with_parent_async(Pid) ->
  +    register_with_async(Pid).
  +
  +register_with_async(Pid) ->
       controller = get_role(),
       ok = call(Pid, {register_child_async, self()}).
   
  
positive.code: -export([start/1, start/2, start_many/2,
           perform/1, perform/2,
           abort/1, abort_many/1,
           send/2,
           with/2, with_many/3,
           wait/1, wait_many/1, wait_any/1,
           race/2, map/2, foreach/2,
  
negative.code: send(Async, Msg) ->
      Async ! {'$async_msg', Msg},
      Msg.
  
  adopt(Child) ->
      executor = get_role(),
      ok = call(Child, {initiate_adoption, get_controller(), self()}).
  
  with(AsyncBody, Fun) ->
      Async = start(AsyncBody),
  