R/zzz.R

In zapier/parquetr: Easy methods for reading/writing Parquet files on S3

.package_env <- new.env(parent = emptyenv())

#' Log to stdout if set to verbose
#'
#' @param ... Args passed to message
#'
#' @return None, side-effect only
#' @importFrom methods getPackageName
log_if_verbose <- function(...) {
  if (isTRUE(getOption("parquetr.verbose"))) {
    message(getPackageName(), " in ", sys.calls()[sys.nframe()-1][[1]][1], "(): ", ...)
  }
}