anchor.diff:  -export([get_name/0, get_name/1, get_name/2]).
   -export([get_spaces/0, get_spaces/1, get_spaces/2]).
   -export([has_eff_user/2, has_eff_user/3]).
  +-export([update_space_support_size/2]).
   -export([supports_space/1, supports_space/2, supports_space/3]).
   -export([map_idp_group_to_onedata/2]).
   -export([get_domain/0, get_domain/1, get_domain/2]).
  
positive.code: -spec binaries_to_strings([binary()]) -> [string()].
  binaries_to_strings(List) ->
      [binary_to_list(B) || B <- List].
  
negative.code:             supports_space(ProviderDoc, SpaceId);
          _ ->
              false
      end.
  
  
  %%--------------------------------------------------------------------
  %% @doc
  %% Changes support size of this provider towards given space,
  %% given that data stored on this provider is not larger than
  %% the intended size.
  %% @end
  %%--------------------------------------------------------------------
  -spec update_space_support_size(SpaceId :: od_space:id(), SupportSize :: integer()) ->
      ok | gs_protocol:error().
  update_space_support_size(SpaceId, SupportSize) ->
      OccupiedSize = space_quota:current_size(SpaceId),
      if
          OccupiedSize > SupportSize ->
              {error, storage_space_occupied};
          true ->
              do_update_space_support_size(SpaceId, SupportSize)
      end.
  
  
  