Expose list validators as S3 methods?

[richfitz]

Or some other way that allows this approach:

x <- list_constructor()
x$field <- field_value
validate(x)