anchor.diff:  		(_St, _Hs, Xml) -> riaks2c_http:throw_response_error(Xml)
   	end).
   
  +-spec head(pid(), iodata(), iodata(), riaks2c:options()) -> reference().
  +head(Pid, Bucket, Key, Opts) ->
  +	head(Pid, Bucket, Key, #{}, Opts).
  +
  +-spec head(pid(), iodata(), iodata(), riaks2c_http:request_options(), riaks2c:options()) -> reference().
  +head(Pid, Bucket, Key, ReqOpts, Opts) ->
  +	#{id := Id, secret := Secret, host := Host} = Opts,
  +	Headers = maps:get(headers, ReqOpts, []),
  +	riaks2c_http:head(Pid, Id, Secret, Host, [<<$/>>, Key], Bucket, Headers).
  +
  +-spec expect_head(pid(), reference()) -> {riaks2c_http:status(), riaks2c_http:headers()}.
  +expect_head(Pid, Ref) ->
  +	expect_head(Pid, Ref, #{}).
  +
  +-spec expect_head(pid(), reference(), riaks2c_http:request_options()) -> {riaks2c_http:status(), riaks2c_http:headers()}.
  +expect_head(Pid, Ref, ReqOpts) ->
  +	Mref = monitor(process, Pid),
  +	expect_head(Pid, Ref, ReqOpts, Mref).
  +
  +-spec expect_head(pid(), reference(), riaks2c_http:request_options(), reference()) -> {riaks2c_http:status(), riaks2c_http:headers()}.
  +expect_head(Pid, Ref, ReqOpts, Mref) ->
  +	Timeout = maps:get(request_timeout, ReqOpts, riaks2c_http:default_request_timeout()),
  +	riaks2c_http:await_head(
  +		Pid, Ref, Timeout, Mref,
  +		fun
  +			(nofin, Status, Headers) ->
  +				%% Assuming we're using this function with riaks2c_object:get/{4,5}
  +				{Status, Headers};
  +			(fin, Status, Headers) ->
  +				demonitor(Mref, [flush]),
  +				gun:flush(Ref),
  +				{Status, Headers}
  +		end).
  +
   -spec get(pid(), iodata(), iodata(), riaks2c:options()) -> reference().
   get(Pid, Bucket, Key, Opts) ->
   	get(Pid, Bucket, Key, #{}, Opts).
  
positive.code: 	list/4,
  	expect_list/2,
  	expect_list/3,
  	get/4,
  	get/5,
  	await_get/2,
  
negative.code: get(Pid, Bucket, Key, ReqOpts, Opts) ->
  	#{id := Id, secret := Secret, host := Host} = Opts,
  	Headers = maps:get(headers, ReqOpts, []),
  	riaks2c_http:get(Pid, Id, Secret, Host, [<<$/>>, Key], Bucket, Headers).
  
  -spec await_get(pid(), reference()) -> {ok, iodata()} | {error, any()}.
  await_get(Pid, Ref) ->
  