x <- structure(c(a = 1), b = 2)
assert_has_all_attributes(x, c("names", "b"))
assert_has_any_attributes(x, c("names", "c"))
#These examples should fail.
assert_has_all_attributes(x, c("names", "c"))
Run the code above in your browser using DataLab