anchor.diff:  all() ->
   	[store_noexist, store_exist,
   			store_vendor_noexist, store_vendor_exist,
  -			add, fetch_exist, fetch_noexist,
  -			find_exist, find_noexist, get_all,
  -			password, example1, example2, example3].
  +			add, add_vendor,
  +			fetch_exist, fetch_noexist,
  +			fetch_vendor_exist, fetch_vendor_noexist,
  +			find_exist, find_noexist,
  +			find_vendor_exist, find_vendor_noexist,
  +			get_all, password, example1, example2, example3].
   
   %%---------------------------------------------------------------------
   %%  Test cases
  
positive.code: 	AttrsBin2 = radius_attributes:codec(Attrs2),
  	SizeBin1 = size(AttrsBin1),
  	<<AttrsBin1:SizeBin1/binary, ?PortLimit, 6, 1:32>> = AttrsBin2.
  
  fetch_exist() ->
  	[{userdata, [{doc, "Get the value of an existing attribute"}]}].
  
negative.code: 	AttrsBin = ?config(example_attributes, Config),
  	Attrs = radius_attributes:codec(AttrsBin),
  	{error, not_found} = radius_attributes:find(?State, Attrs).
  
  find_vendor_exist() ->
  	[{userdata, [{doc, "Look for the value of an existing vendor specific attribute"}]}].
  
  find_vendor_exist(Config) ->
  	AttrsBin = ?config(example_attributes, Config),
  	Attrs = radius_attributes:codec(AttrsBin),
  	{ok, "sigscale.net"} = radius_attributes:find(?Mikrotik, ?MikrotikRealm, Attrs).
  
  find_vendor_noexist() ->
  	[{userdata, [{doc, "Look for the value of a nonexistent vendor specific attribute"}]}].
  
  find_vendor_noexist(Config) ->
  	AttrsBin = ?config(example_attributes, Config),
  	Attrs = radius_attributes:codec(AttrsBin),
  	{error, not_found} = radius_attributes:find(?Microsoft, ?MsChapError, Attrs).
  
  get_all() ->
  	[{userdata, [{doc, "Get all values of an attribute"}]}].
  