Add `trace` argument to `cnd_message()`

[lionel-]

To optionally print the backtrace footer.

Currently the only way is to turn on a flag inside the error with an unexported function:

cnd <- rlang:::cnd_set_backtrace_on_error(cnd, "full")

[hadley]

I think format() is all we need here so you can close this.