anchor.diff:  handle_info(die_for_testing_purposes_only, _State) ->
       %% exit({told_to_die, lists:duplicate(500000, $x)});
       exit({told_to_die, lists:duplicate(50, $x)});
  +handle_info(inactivity_timeout, _State) ->
  +    %% No events have arrived for the timeout period
  +    %% so hibernate to free up resources.
  +    {ok, _State, hibernate};
   handle_info(Info, State) ->
       lager:info("handle_info got ~p", [Info]),
       {ok, State}.
  
positive.code: %%                          remove_handler
  %% @end
  %%--------------------------------------------------------------------
  handle_event({monitor, Pid, Type, Info}, State) ->
      Pretty = format_pretty_proc_info(Pid, almost_current_function),
      lager:info("monitor ~w ~w ~s ~w",
                            [Type, Pid, Pretty, Info]),
      {ok, State};
  handle_event(Event, State) ->
      lager:info("Monitor got ~p", [Event]),
      {ok, State}.
  
  %%--------------------------------------------------------------------
  %% @private
  
negative.code: %% @end
  %%--------------------------------------------------------------------
  init([]) ->
      {ok, #state{}, hibernate}.
  
  %%--------------------------------------------------------------------
  %% @private
  