anchor.diff:  
   all_stored_marks_stored_case() ->
       Has = etorrent_pieceset:from_list([0,1], 3),
  -    {ok, [{0, 0, 1}]} = ?progress:request_chunks(testid(), Has, 1),
  -    {ok, [{0, 1, 1}]} = ?progress:request_chunks(testid(), Has, 1),
  -    ?assertMatch({ok, [{1, 0, 1}]}, ?progress:request_chunks(testid(), Has, 1)),
  -    ?assertMatch({ok, [{1, 1, 1}]}, ?progress:request_chunks(testid(), Has, 1)).
  +    {ok, [{0, 0, 1}]} = ?chunkstate:request(progress(), Has, 1),
  +    {ok, [{0, 1, 1}]} = ?chunkstate:request(progress(), Has, 1),
  +    ?assertMatch({ok, [{1, 0, 1}]}, ?chunkstate:request(progress(), Has, 1)),
  +    ?assertMatch({ok, [{1, 1, 1}]}, ?chunkstate:request(progress(), Has, 1)).
   
   get_all_request_case() ->
       Has = etorrent_pieceset:from_list([0,1,2], 3),
  -    {ok, [{0, 0, 1}]} = ?progress:request_chunks(testid(), Has, 1),
  -    {ok, [{0, 1, 1}]} = ?progress:request_chunks(testid(), Has, 1),
  -    {ok, [{1, 0, 1}]} = ?progress:request_chunks(testid(), Has, 1),
  -    {ok, [{1, 1, 1}]} = ?progress:request_chunks(testid(), Has, 1),
  -    {ok, [{2, 0, 1}]} = ?progress:request_chunks(testid(), Has, 1),
  -    {ok, [{2, 1, 1}]} = ?progress:request_chunks(testid(), Has, 1),
  -    ?assertEqual({ok, assigned}, ?progress:request_chunks(testid(), Has, 1)).
  +    {ok, [{0, 0, 1}]} = ?chunkstate:request(progress(), Has, 1),
  +    {ok, [{0, 1, 1}]} = ?chunkstate:request(progress(), Has, 1),
  +    {ok, [{1, 0, 1}]} = ?chunkstate:request(progress(), Has, 1),
  +    {ok, [{1, 1, 1}]} = ?chunkstate:request(progress(), Has, 1),
  +    {ok, [{2, 0, 1}]} = ?chunkstate:request(progress(), Has, 1),
  +    {ok, [{2, 1, 1}]} = ?chunkstate:request(progress(), Has, 1),
  +    ?assertEqual({ok, assigned}, ?chunkstate:request(progress(), Has, 1)).
   
   unassigned_to_assigned_case() ->
       Has = etorrent_pieceset:from_list([0], 3),
  -    {ok, [{0,0,1}, {0,1,1}]} = ?progress:request_chunks(testid(), Has, 2),
  -    ?assertEqual({ok, assigned}, ?progress:request_chunks(testid(), Has, 1)).
  +    {ok, [{0,0,1}, {0,1,1}]} = ?chunkstate:request(progress(), Has, 2),
  +    ?assertEqual({ok, assigned}, ?chunkstate:request(progress(), Has, 1)).
   
   -endif.
  
positive.code:         {ok, ITorrentPid} -> ITorrentPid
      end,
      ScarcityPid = case orddict:find(scarcitypid, Args) of
          error -> etorrent_scarcity:await_scarcity_server(TorrentID);
          {ok, IScarcityPid} -> IScarcityPid
      end,
      Pending = case orddict:find(pendingpid, Args) of
  
negative.code: %% @private
  -spec state_members(torrent_id(), piece_state()) -> pieceset().
  state_members(TorrentID, Piecestate) ->
      ChunkSrv = lookup_server(TorrentID),
      case Piecestate of
          invalid -> error(badarg);
          _ -> call(ChunkSrv, {state_members, Piecestate})
  