R/exceptions.R

Defines functions DigestNotFoundError

DigestNotFoundError <- function(table, digest) {
  msg <- sprintf("blob %s not found in table %s", digest, table)
  structure(list(table = table,
                 digest = digest,
                 message = msg,
                 call = NULL),
            class = c("DigestNotFoundError", "error", "condition"))
}
richfitz/crater documentation built on May 25, 2017, 2:09 a.m.