anchor.diff:      {reply, PartisanRef, StateFinal};
   handle_call({demonitor, PartisanRef}, _From, State) ->
       Ref = maps:get(PartisanRef, State),
  -    erlang:demonitor(Ref),
  +    erlang:demonitor(Ref, [flush]),
       State1 = maps:remove(PartisanRef, State),
       StateFinal = maps:remove(Ref, State1),
       {reply, true, StateFinal};
  
positive.code: start_link() ->
      partisan_gen_server:start_link({local, ?MODULE}, ?MODULE, [], []).
  
  monitor({partisan_remote_reference, Node,
           {partisan_process_reference, PidAsList}}) ->
      partisan_gen_server:call({?MODULE, Node}, {monitor, PidAsList}).
  
  demonitor({partisan_remote_reference, Node,
             {partisan_encoded_reference, _}} = PartisanRef) ->
      partisan_gen_server:call({?MODULE, Node}, {demonitor, PartisanRef}).
  
  %%%===================================================================
  
negative.code: -behaviour(partisan_gen_server).
  
  % API
  -export([start_link/0, monitor/1, demonitor/1, demonitor/2]).
  
  %% gen_server callbacks
  -export([init/1,
  