anchor.diff:      Length = length(List),
       check_min_elements_(Length, Key, lists:keyfind('min-elements',1,Info)),
       check_max_elements_(Length, Key, lists:keyfind('max-elements',1,Info)),
  -    {binary_to_atom(Key, latin1), List, Info};
  +    {to_atom(Key), List, Info};
   validate_rpc_elem(Stmt, {Key, Other}, _Info)
     when Stmt==list; Stmt=='leaf-list' ->
       throw({invalid_params, {mismatch, [Key, Other, array]}}).
  
positive.code: i(I) ->
      lists:duplicate(I,$\s).
  
  
  %% ===================================================================
  %% EUnit Test Code
  
negative.code: 	    ok
      end.
  
  check_max_elements_(_, _Key, {'max-elements',_,<<"unbounded">>,_}) ->
      ok;
  check_max_elements_(Length, Key, {'max-elements',_,Max,_}) ->
      case list_to_integer(binary_to_list(Max)) of
  	N when N < Length ->
  