anchor.diff:                  fun proc_lib:spawn/1
           end,
   
  +    Parent           = self(),
  +    ParentController = get_controller(),
  +
       SpawnFun(
         fun () ->
  -              async_init(Parent, PDict, Opts, Fun)
  +              async_init(Parent, ParentController, Opts, Fun)
         end).
   
   perform(Fun) ->
  
positive.code:       fun (Msg) ->
                self() ! Msg
        end, lists:reverse(PendingMsgs)).
  
negative.code:     start(Fun, []).
  
  start(Fun, Opts) ->
      SpawnFun =
          case proplists:get_value(monitor, Opts, false) of
              true ->
  