anchor.diff:      end.
   
   %%%===================================================================
  -%%% Internal functions
  +%%% RPC
   %%%===================================================================
   
   %%--------------------------------------------------------------------
  -%% @private
   %% @doc
  -%% Returns content of storage test file.
  +%% Verifies content of storage test file and removes it.
   %% @end
   %%--------------------------------------------------------------------
  --spec read_test_file(helpers:helper(), helpers:user_ctx(), helpers:file_id()) ->
  -    Content :: binary().
  -read_test_file(Helper, UserCtx, FileId) ->
  -    Handle = helpers:get_helper_handle(Helper, UserCtx),
  -    {ok, FileHandle} = helpers:open(Handle, FileId, read),
  -    {ok, Content} = helpers:read(FileHandle, 0, ?TEST_FILE_CONTENT_LEN),
  -    ok = helpers:release(FileHandle),
  -    Content.
  +-spec verify_test_file(helpers:helper(), helpers:user_ctx(), helpers:file_id(),
  +    Content :: binary()) -> ok | {error, term()}.
  +verify_test_file(Helper, UserCtx, FileId, ExpectedFileContent) ->
  +    case read_test_file(Helper, UserCtx, FileId) of
  +        ExpectedFileContent ->
  +            remove_test_file(Helper, UserCtx, FileId, byte_size(ExpectedFileContent)),
  +            ok;
  +        UnexpectedFileContent ->
  +            {error, {storage_test_file, {ExpectedFileContent, UnexpectedFileContent}}}
  +    end.
  +
  +%%%===================================================================
  +%%% Internal functions
  +%%%===================================================================
   
   %%--------------------------------------------------------------------
   %% @private
  
positive.code: 
  
  %% API
  -export([generate_file_id/0, create_test_file/3, update_test_file/3,
      remove_test_file/4, verify_test_file/4, verify_storage_on_all_nodes/1]).
  
  -define(TEST_FILE_NAME_LEN, application:get_env(?APP_NAME,
      storage_test_file_name_size, 32)).
  
negative.code: 
  %%--------------------------------------------------------------------
  %% @doc
  %% Returns content of storage test file.
  %% @end
  %%--------------------------------------------------------------------
  -spec read_test_file(helpers:helper(), helpers:user_ctx(), helpers:file_id()) ->
      Content :: binary().
  read_test_file(Helper, UserCtx, FileId) ->
      Handle = helpers:get_helper_handle(Helper, UserCtx),
      {ok, FileHandle} = helpers:open(Handle, FileId, read),
      {ok, Content} = helpers:read(FileHandle, 0, ?TEST_FILE_CONTENT_LEN),
      ok = helpers:release(FileHandle),
      Content.
  
  %%--------------------------------------------------------------------
  %% @doc
  