anchor.diff:  	%% Extra tests
   	ok = bpop(<<"blpop">>,Client),
   	ok = bpop(<<"brpop">>,Client),
  -	
  +
   	{error,<<"ERR wrong number of arguments for 'BLPOP' command">>} = erldis_client:sr_scall(Client,[<<"blpop">>]),
   	{error,<<"ERR wrong number of arguments for 'BLPOP' command">>} = erldis_client:sr_scall(Client,[<<"blpop">>,<<"mylist4">>]),
       {error,<<"ERR timeout is not an integer or out of range">>} = erldis_client:sr_scall(Client,[<<"blpop">>,<<"mylist4">>,<<"mylist3">>]),
  
positive.code: 	receive 
  		[<<"list4">>,<<"bar">>] -> ok;
  		Resp3 -> ct:fail(Resp3) 
  	after 2000 -> ct:fail("ERR Timeout")
  	end,
  	false = erldis_client:sr_scall(Client,[<<"exists">>,<<"list4">>]),
  	false = erldis_client:sr_scall(Client,[<<"exists">>,<<"list5">>]),
  
negative.code: 	
  	%% Inside a transaction
  	ok = erldis_client:sr_scall(Client,[<<"flushdb">>]),
  	true = erldis_client:sr_scall(Client,[<<"lpush">>,<<"xxlist">>,<<"foo">>]),
  	2 = erldis_client:sr_scall(Client,[<<"lpush">>,<<"xxlist">>,<<"bar">>]),
  	
  	ok = erldis_client:sr_scall(Client,[<<"multi">>]),
  	queued = erldis_client:sr_scall(Client,[<<"brpoplpush">>,<<"xxlist">>,<<"target">>,1]),
  	queued = erldis_client:sr_scall(Client,[<<"brpoplpush">>,<<"xxlist">>,<<"target">>,1]),
  	queued = erldis_client:sr_scall(Client,[<<"brpoplpush">>,<<"xxlist">>,<<"target">>,1]),
  	queued = erldis_client:sr_scall(Client,[<<"lrange">>,<<"xxlist">>,0,-1]),
  	queued = erldis_client:sr_scall(Client,[<<"llen">>,<<"target">>]),	
  	
  	[<<"foo">>,<<"bar">>,nil,<<"*0">>,2] = erldis_client:scall(Client,[<<"exec">>]),
  