# make sure unchanged from previous assignment

vetr:::parse_validator(quote(((a && b) || .(.))), quote(arg_to_validate))

vetr:::parse_validator(quote(matrix(nrow = 3) && .(.)), quote(arg_to_validate))

vetr:::parse_validator(quote((a || ((b && c))) && .(a + .)), 
    quote(arg_to_validate))

vetr:::parse_validator(quote((a || ((b && .(c)))) && (a + .(.))), 
    quote(arg_to_validate))

vetr:::parse_validator(quote(a && (b + .(c))), quote(arg_to_validate))

!is.na(.)
attr(,"err.msg")
[1] "%sshould not contain NAs, but does"

z <- quote(integer(1L) && .(!any(is.na(.))))