anchor.diff:           ?_test(not_interested_case()),
            ?_test(request_one_case()),
            ?_test(mark_dropped_case()),
  -         ?_test(mark_all_dropped_case())
  +         ?_test(mark_all_dropped_case()),
  +         ?_test(drop_none_on_exit_case()),
  +         ?_test(drop_all_on_exit_case()),
  +         ?_test(marked_stored_not_dropped_case())
           ]}.
   
   lookup_registered_case() ->
  
positive.code: code_change(_OldVsn, State, _Extra) ->
      {ok, State}.
  
  -ifdef(TEST).
  -define(chunk_server, ?MODULE).
  
  initial_chunk_server(ID) ->
      {ok, Pid} = ?chunk_server:start_link(ID, 1, [], [{0, 2}, {1, 2}, {2, 2}]),
  
negative.code:     not_implemented.
  
  handle_info({'DOWN', _, process, Pid, _}, State) ->
      #state{
          piece_chunks=PieceChunks,
          peer_monitors=Peers} = State,
      %% Add the chunks back to the chunkset of each piece.
      OpenReqs = etorrent_monitorset:fetch(Pid, Peers),
      NewPieceChunks = lists:foldl(fun({PieceIndex, Offset, Length}, Acc) ->
          insert_chunk(PieceIndex, Offset, Length, Acc)
      end, PieceChunks, chunk_list(OpenReqs)),
      %% Delete the peer from the set of monitored peers
      NewPeers = etorrent_monitorset:delete(Pid, Peers),
      NewState = State#state{
          piece_chunks=NewPieceChunks,
          peer_monitors=NewPeers},
      {noreply, NewState}.
  
  %% @private
  terminate(_Reason, _State) ->
  