anchor.diff:              false
       end.
   
  --spec create_object(cdmi_state(), object_type(), list() | binary(), map()) ->
  +-spec create_object(cdmi_state(), object_type(), binary(), map()) ->
             {boolean(), map()} | false.
   create_object(State, ObjectType, DomainName, Body) when is_binary(ObjectType), is_binary(DomainName), is_map(Body) ->
   %    ?nebMsg("Entry"),
  
positive.code: -spec extract_parentURI(list(), list()) -> list().
  extract_parentURI([], Acc) ->
      Acc;
  extract_parentURI([H|T], Acc) when is_binary(H) ->
      Acc2 = Acc ++ "/" ++ binary_to_list(H),
      extract_parentURI(T, Acc2);
  extract_parentURI([H|T], Acc) ->
      Acc2 = Acc ++ "/" ++ H,
      extract_parentURI(T, Acc2).
  
negative.code:                     ?assertMatch(<<"/">>, get_parent_uri(list_to_binary(FirstLevelPath))),
                      ?assertMatch(<<"/container/">>, get_parent_uri(list_to_binary(SecondLevelPath))),
                      ?assertException(error, function_clause, get_parent_uri(not_a_list_or_binary))
                  end
              },
              {"Test get_time/0",
                  fun () ->
                      ?assertMatch("1970-01-01T00:00:00.000000Z", get_time())
                  end
              },
              {"Test get_value/2",
  