anchor.diff:              UpdCreationTime = {MegaSecs, Secs, Value}
       end,
       process_creation_time(RestObjects, UpdCreationTime).
  -
  -
  -%% ===================================================================
  -%% Eunit tests
  -%% ===================================================================
  -
  --ifdef(TEST).
   
   %% @TODO Use eqc to do some more interesting case explorations.
   
  
positive.code: permissions_to_json_term(Perms) ->
      [list_to_binary(atom_to_list(Perm)) || Perm <- Perms].
  
  %% @doc Process the top-level elements of the
  -spec process_acl_contents([term()], acl()) -> acl().
  process_acl_contents([], Acl) ->
  
negative.code:     {error, access_denied};
  validate_acl({error, _}=Error, _) ->
      Error.
  
  %% @doc Convert an internal representation of an ACL into
  %% erlang terms that can be encoded using `mochijson2:encode'.
  